比如文件夹下面有001.jpg，002.jpg，003.jpg，004.jpg，005.jpg，要将001和002合并成001.pdf，003和004和005合并成002.pdf

我只能感叹：万能的VFP！

Word2007(Excel2007)都可以将文档保存为PDF格式，可以试试用VFP VBA来操作试试，不过这可不是VFP的强项。

* 将001.jpg和002.jpg合并输出至001.pdf，注意WORD版本须2007以上
oDoc=CREATEOBJECT('word.application')
odoc.Documents.Add
odoc.Selection.InlineShapes.AddPicture('001.jpg')
odoc.Selection.InlineShapes.AddPicture('002.jpg')
odoc.ActiveDocument.ExportAsFixedFormat('001.pdf',17)
odoc.ActiveDocument.Close(.f.)
odoc.Quit

程序错误啊，提示：找不到word.application类定义
电脑上已经安装好了word2007啊

在我的电脑上是调试通过的。请确认安装Office时是否选择安装了Visual Basic for Applications，这是在VFP中调用VBA的前提。



[ 本帖最后由 liuxingang28 于 2014-2-21 08:25 编辑 ]