如何将word文档转换成xml文件(救急啊~~~~~,500分相送!!!)(200分)

  • 主题发起人 主题发起人 andd_chen
  • 开始时间 开始时间
A

andd_chen

Unregistered / Unconfirmed
GUEST, unregistred user!
我想将word文档转换成xml文件,如有代码,或给出重要提示,本人将送500分!绝不食言
 
自己先顶一下!
 
docapp:=CreateOleObject('Word.Application');
wDoc := docapp.Documents.open('XXX.doc');
wdoc.saveas('XXX.html',FileFormat:=wdOpenFormatWebPages);
 
word可以保存为网页格式,XML也是支持的。
 
对了,我的qq:492354682 msn :andd_chen@126.com
email:andd_chen@126.com
 
3,4楼的兄弟
我的word中有图片,用那种方式转换不出来,我该怎么办啊 ~~~~~~~
天将降大任于斯人也!!!
好难熬呀!!!
 
现在的WORK支持存XML啊,图片为转为Data[[
 
to kkyy:
大哥,能做个demo给我吗?我保证送上500分!
 
各位大哥,小弟真的很急,在线等
 
方法一:
方法有都是,你可以自己编写XML结构,很简单的,不过比较麻烦。
方法二:使用WORD本身的存储工程,使用VBA编程,保存为XML格式。
方法三:结合数据库的内存表,用ClientDataSet保存WORD文件为XML,
ClientDataSet不但支持平面简单文件,数据库绑定,而且可以保存为XML格式等。
 
to 蓝叶菱:
大哥,我可以加你的qq和你联系吗?
 
通过中间控件richview容易做到
 
qq:340666276
新建一个ClientDataSet,创建一个BLOB字段,创建一个dataset,代码如下。
WITH ClientDataSet1 do
begin
Open;
Edit;
TBlobField(FieldByName('WORD')).LoadFromFile('e:/tx/10000000.doc');
Post;
SaveToFile('e:/tx/111.xml',dfxml);
end;
测试成功通过,不过你做的时候,前面的设置必须,要不EDIT,POST,OPEN绝对出错。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
930
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部