1. my_word=createobject("word.application")
2. my_word.VISIBLE=.T.
3. my_word.Documents.Open("C:/TMP1.DOC")
4. my_word.ActiveDocument.MailMerge.OpenDataSource("C:/TMP1.DBF")
5. my_word.ActiveDocument.MailMerge.Execute
6. my_word.ActiveDocument.Saveas("C:/NEW_TMP1.DOC")
7. my_word.application.quit
8. my_word=null
9. release my_word
copy to c:/tmp1 type foxpuls && vfp9.0的dbf导入Word邮件合并数据源这种格式才支持。