如何用VFP传递数据给WORD邮件文件中。
新建文件夹.rar
(135.92 KB)
问题描述:
word环境下已经做好邮件模板文件
VFP环境下做好了相应的表单文件,表单设有三个命令按钮,其中“打印”按钮的代码如下:
SET SAFETY off
wjm=SYS(5)+SYS(2003)+"\普通全日制学位证明.doc"
WordApp=CREATEOBJECT("word.application")
COPY TO abc FOR ALLTRIM(xm)==ALLTRIM(thisform.text1.Value) AND UPPER(ALLTRIM(zjhm))==UPPER(ALLTRIM(thisform.text2.Value)) xl5
WordTable=WordApp.Application.Documents.Open(wjm)
WordApp.Visible =.t.
基本意思是按输入的姓名和身份证号码查找记录,然后将数据拷贝为EXCEL文件,并且打开已经写好的WORD邮件模板。现在的问题是WORD邮件模板可以打开,但是需要重新设置一次数据源。
不知道有没有办法可能在打开邮件的时候直接按原邮件模板设置的好数据源直接激活?