用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自動化部分包含可用的類和方法的列表。