首页 | 社区 | 博客 | 招聘 | 文章 | 新闻 | 下载 | 项目交易 | 网友作品 | 读书 | ACM题库 | 源码
亲,您未登录哦! 登录 | 注册

VFP调用Word创建文档

(加入日期: 2002-01-31 )

打印文章】【字体:

分享到:
    在应用系统的设计中,有时要求在程序中自动调用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年工作计划”。
  (海军航空工程学院孔波264001)

本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )

编程爱好者论坛

本栏最新文章