Database 版 (精华区)
发信人: mengy (LEAR DLLS 命令时，将从内存中清除), 信区: Database
标 题: VFP调用Word创建文档
发信站: 哈工大紫丁香 (2000年12月30日19:18:40 星期六), 转信
VFP调用Word创建文档
在应用系统的设计中，有时要求在程序中自动调用Ｍｉｃｒｏｓｏｆｔ 应用
程序，如Ｗｏｒｄ或Ｅｘｃｅｌ 等来创建文档或制作表格。在开发一个办公系统
时，就采用了这种方法。
设计环境：
①ＭｉｃｒｏＳｏｆｔ Ｖｉｓｕａｌ ＦｏｘＰｒｏ ５．０中文版；
②Ｗｉｎｄｏｗｓ ９８中文操作系统；
③Ｍｉｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７。
首先创建一个表单Ｆｏｒｍ１，在Ｆｏｒｍ１上新建一个命令按扭Ｃｏｍｍａｎｄ
１，并设置Ｃｏｍｍａｎｄ１的Ｃａｐｔｉｏｎ 为“自动创建Ｗｏｒｄ文档”。
Ｃｏｍｍａｎｄ１的Ｃｌｉｃｋ 过程包括下列命令
语句：ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇启动窗＇
ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇启动Ｍｉｃｒｏｓｏｆｔ （Ｒ）
Ｗｏｒｄ ９７＇ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０
ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ
（ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤｉａｌｏｇＴｙｐｅ ，ｃ Ｍｅｓｓａｇｅ
Ｔｉｔｌｅ）
ｆｉｌｅｎａｍｅ ＝＇９９年工作计划＇
ｐｕｂｌｉｃ ｏｂｊｗｄｏｃ
ｎｌｌｏｃａｌｅＩｄ ＝ｓｙｓ（３００４）
＝ｓｙｓ（３００６，１０３３）
ｏｂｊＷＤｄｏｃ ＝ｃｒｅａ（＂ｗｏｒｄ ．ｂａｓｉｃ＂）
ｏｂｊｗｄｄｏｃ ．ａｐｐｓｈｏｗ
ｏｂｊＷＤｄｏｃ ．ａｐｐｍａｘｉ ｍｉｚｅ
ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｎｅｗｄｅｆａｕｌｔ
ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｓａｖｅａｓ（＂＆ｆｉｌｅｎａｍｅ＂）
＝ｓｙｓ（３００６，ｖａｌ（ｎｌＬｏｃａｌｅＩｄ））
ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇结束窗＇
ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇文档创建完毕＇＋ｃｈｒ（１３）＋＇退出Ｍｉ
—
ｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７＇
ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０
ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ（ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤ
ｉａｌｏｇＴｙｐｅ ，
ｃ ＭｅｓｓａｇｅＴｉｔｌｅ）
这样，在命令窗口中运行上述Ｆｏｒｍ 时，单击“自动创建Ｗｏｒｄ 文档”按扭
，则自动调用Ｗｏｒｄ ９７创建文档，且文档的名字为“９９年工作计划”。
（海军航空工程学院孔波２６４００１）
返回首页
--
大海无边天做岸
山登绝顶我为风
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.121]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间：5.884毫秒