在VFP中，如何将几张JPG文件合并成一个PDF文件？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 在VFP中，如何将几张JPG文件合并成一个PDF文件？

标题：在VFP中，如何将几张JPG文件合并成一个PDF文件？

只看楼主

hxmail

等　级：新手上路
帖　子：9
专家分：0
注　册：2014-2-19
结帖率：100%

楼主

问题点数：0 回复次数：5

在VFP中，如何将几张JPG文件合并成一个PDF文件？

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

搜索更多相关主题的帖子: 文件夹　如何　

2014-02-19 20:49

hu9jj

来　自：红土地
等　级：贵宾
威　望：396
帖　子：11713
专家分：43267
注　册：2006-5-13

第 2 楼

得分:0

我只能感叹：万能的VFP！

活到老，学到老！ http://www. E-mail:hu-jj@

2014-02-20 11:26

qjbzjp

来　自：尧的故乡
等　级：贵宾
威　望：48
帖　子：1914
专家分：4397
注　册：2007-3-14

第 3 楼

得分:0

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

相互学习，互相交流，共同提高。

2014-02-20 15:46

liuxingang28

来　自：山东济南
等　级：贵宾
威　望：47
帖　子：649
专家分：2156
注　册：2014-2-7

第 4 楼

得分:0

* 将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

泉城飞狐

2014-02-20 16:54

hxmail

等　级：新手上路
帖　子：9
专家分：0
注　册：2014-2-19

第 5 楼

得分:0

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

2014-02-20 21:38

liuxingang28

来　自：山东济南
等　级：贵宾
威　望：47
帖　子：649
专家分：2156
注　册：2014-2-7

第 6 楼

得分:0