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 过程包括下列命令

语句:c MessageTitle ='启动窗'

c MessageText ='启动Microsoft (R) Word 97'nDialogType =0+64+0 nAnswer =MESSAGEBOX (c MessageText ,nDialogType ,c MessageTitle)

filename ='99年工作计划' public objwdoc

nllocaleId =sys(3004) =sys(3006,1033)

objWDdoc =crea("word .basic") objwddoc .appshow

objWDdoc .appmaxi mize

objwddoc .filenewdefault

objwddoc .filesaveas("&filename") =sys(3006,val(nlLocaleId)) c MessageTitle ='结束窗'

c MessageText ='文档创建完毕'+chr(13)+'退出Mi— crosoft (R)Word 97' nDialogType =0+64+0

nAnswer =MESSAGEBOX(c MessageText ,nDialogType ,

c MessageTitle)

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

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