VFP调用Word创建文档

VFP调用Word创建文档

出处:网络

在应用系统的设计中,有时要求在程序中自动调用Microsoft 应 用程序,如Word或Excel 等来创建文档或制作表格。在开发一个办公系统时,就采用了这种方法。 设计环境:

①MicroSoft Visual FoxPro 5.0中文版; ②Windows 98中文操作系统; ③Microsoft (R)Word 97。

首先创建一个表单Form1,在Form1上新建一个命令按扭Command1,并设置Command1的Caption 为“自动创建Word文档”。Command1的Click 过程包括下列命令:

语句:

cMessageTitle=”启动窗”

cMessageText=”启动Microsoft?Word97” nDialogType=0+64+0

nAnswer=Messagebox(cMessageText, nDialogType, cMessageTitle) FileName=”99年工作计划” Public ObjWord nlLocaleid=Sys(3004) =Sys(3006,1033)

ObjWDdoc=Creat(“Word.Basic”) ObjWDdoc.AppShow ObjWDdoc.AppMaxi Mize ObjWDdoc.FileNeweFault

ObjWDdoc.FileSaveAs(“&FleName”) =Sys(3006,Val(nlLocaleid)) cMessageTitle=”结束窗”

cMessageText=”文档创建完毕”+Chr(13)+”退出Microsoft?Word97” nDialogType=0+64+0

nAnswer=Messagebox(cMessageText, nDialogType, cMessageTitle)

这样,在命令窗口中运行上述Form 时,单击“自动创建Word 文档”按扭,则自动调用Word 97创建文档,且文档的名字为“99年工作计划”。

联系客服:779662525#qq.com(#替换为@) 苏ICP备20003344号-4