怎样用vfp来打开一个*doc文件,进行修改等???

[ys497]

用vfp可以打开excel文件,但如何打开一个d;\my.doc文件
1只能读,不能改,
2进行修改后保存为另一个d:\my1.doc文件.
请高手赐教!!!

[ys497]

我用以下命令可以打开excel,uf并进行修改后取名为d:\3.xls保存下来.
********
Excel = CREATEOBJECT("Excel.Application")
oExcel.visible=.t.
oBooks=oexcel.workbooks.add &&令obooks为新打开的excel类型的文件名
oBooks.SaveAs("d:\3.XLS") &&将obooks中的操作保存在d:下并取名为3.xls
***************
但用以下命令可以打开word,但执行到第三句是屏幕显示'workbooks不认识'请教高手应改为什么!!!!
oword = CREATEOBJECT("word.Application")
oword.visible=.t.
oBooks=oword.workbooks.add
oBooks.SaveAs("d:\3.doc")

[ys497]

但用以下命令可以打开word,但执行到第三句是屏幕显示'成员workbooks不是一个对象'请教高手应改为什么!!!!

[lesome]

* Open a Word Object
oWordObj = CREATEOBJECT("Word.Application")

* Next open the original document in a second window
oWordObj.Documents.Open("d:\my.doc")
* Save and the document
oWordObj.WordBasic.FileSaveAs("d:\my1.DOC")
我想这样行了吧！

[fj_jiangqi]

word中有个帮忙，介绍的非常详细。我以前是用dde功能实现的，已经过时了，就不说了。
一个小小的建议。

[ys497]

楼上,谢谢,你帮我解决了一个问题,即可以打开("d:\my.doc")的文件,但是oWordObj.WordBasic.FileSaveAs("d:\my1.DOC")
这句出错,不知错在何处?请赐教.

[lesome]

再添加以下语句试试
* Close Word
oWordObj.WordBasic.DocClose

* Quit Word, release the object and clear the desktop
oWOrdObj.Quit
Release oWordObj
Thisform.release

[chaoscat]

呵呵，好麻烦啊。参考一下我提问的帖子吧——“如何用Windows关联程序打开任意类型的文件？”。如果你的文件是放在数据库内的，先存成临时文件，修改保存后再重新存入数据库，应该可行吧。

[chaoscat]

至于如何doc文件如何修改、如何另存为其他文件，劳烦用户自己在word里操作吧（真是不负责任啊:P）。