VFP调用Word创建文档.docVIP

VFP调用Word创建文档 出处:网络 - 　　在应用系统的设计中，有时要求在程序中自动调用Ｍｉｃｒｏｓｏｆｔ 应用程序，如Ｗｏｒｄ或Ｅｘｃｅｌ 等来创建文档或制作表格。在开发一个办公系统时，就采用了这种方法。 设计环境： ①ＭｉｃｒｏＳｏｆｔ Ｖｉｓｕａｌ ＦｏｘＰｒｏ ５．０中文版； ②Ｗｉｎｄｏｗｓ ９８中文操作系统； ③Ｍｉｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７。 首先创建一个表单Ｆｏｒｍ１，在Ｆｏｒｍ１上新建一个命令按扭Ｃｏｍｍａｎｄ１，并设置Ｃｏｍｍａｎｄ１的Ｃａｐｔｉｏｎ 为“自动创建Ｗｏｒｄ文档”。Ｃｏｍｍａｎｄ１的Ｃｌｉｃｋ 过程包括下列命令 语句：ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇启动窗＇ ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇启动Ｍｉｃｒｏｓｏｆｔ （Ｒ） Ｗｏｒｄ ９７＇ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０ ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ （ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤｉａｌｏｇＴｙｐｅ ，ｃ ＭｅｓｓａｇｅＴｉｔｌｅ） ｆｉｌｅｎａｍｅ ＝＇９９年工作计划＇ ｐｕｂｌｉｃ ｏｂｊｗｄｏｃ ｎｌｌｏｃａｌｅＩｄ ＝ｓｙｓ（３００４） ＝ｓｙｓ（３００６，１０３３） ｏｂｊＷＤｄｏｃ ＝ｃｒｅａ（＂ｗｏｒｄ ．ｂａｓｉｃ＂） ｏｂｊｗｄｄｏｃ ．ａｐｐｓｈｏｗ ｏｂｊＷＤｄｏｃ ．ａｐｐｍａｘｉ ｍｉｚｅ ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｎｅｗｄｅｆａｕｌｔ ｏｂｊｗｄｄｏｃ ．ｆｉｌｅｓａｖｅａｓ（＂＆ｆｉｌｅｎａｍｅ＂） ＝ｓｙｓ（３００６，ｖａｌ（ｎｌＬｏｃａｌｅＩｄ）） ｃ ＭｅｓｓａｇｅＴｉｔｌｅ ＝＇结束窗＇ ｃ ＭｅｓｓａｇｅＴｅｘｔ ＝＇文档创建完毕＇＋ｃｈｒ（１３）＋＇退出Ｍｉ— ｃｒｏｓｏｆｔ （Ｒ）Ｗｏｒｄ ９７＇ ｎＤｉａｌｏｇＴｙｐｅ ＝０＋６４＋０ ｎＡｎｓｗｅｒ ＝ＭＥＳＳＡＧＥＢＯＸ（ｃ ＭｅｓｓａｇｅＴｅｘｔ ，ｎＤｉａｌｏｇＴｙｐｅ ， ｃ ＭｅｓｓａｇｅＴｉｔｌｅ） 这样，在命令窗口中运行上述Ｆｏｒｍ 时，单击“自动创建Ｗｏｒｄ 文档”按扭，则自动调用Ｗｏｒｄ ９７创建文档，且文档的名字为“９９年工作计划”。