使用VBScript合并多个PDF文件

Question

我正在寻找一种方法，将多个PDF文件合并到一个VBScript中，只使用Acrobat和Distiller - 不使用任何第三方软件。虽然我真的在网上搜索解决方案，但我找不到一个。有人可以帮帮我吗？

谢谢！ S上。

Answer 1

过去我使用VBScript中的Acrobat Interapplication Communication功能取得了成功。我没有完整版的Acrobat来测试，但这至少应该给你一个起点：

Dim app
Set app = CreateObject("AcroExch.App")

Dim srcDoc, destDoc
Set srcDoc = CreateObject("AcroExch.PDDoc")
Set destDoc = CreateObject("AcroExch.PDDoc")

srcDoc.Open srcPath
destDoc.Create
destDoc.InsertPages 0, srcDoc, 0, srcDoc.GetNumPages(), 0
destDoc.Save 0, destPath

srcDoc.Close
destDoc.Close
app.Exit

API reference的OLE自动化部分包含可用类和方法的列表。