Fusionner plusieurs fichiers PDF avec VBScript

Question

Je suis à la recherche d'un moyen de fusionner plusieurs fichiers PDF en un avec VBScript, uniquement avec Acrobat et Distiller, sans utiliser de logiciel tiers. Bien que je cherchais vraiment une solution sur le web, je ne pouvais pas en trouver un. Quelqu'un peut-il m'aider s'il vous plaît ici?

Merci! S.

Answer 1

J'ai eu du succès dans le passé en utilisant la fonctionnalité Interapplication Communication d'Acrobat de VBScript. Je n'ai pas une version complète d'Acrobat pour tester avec, mais cela devrait au moins vous donner un point de départ:

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 

La section OLE Automation du API reference contient une liste des classes et des méthodes disponibles.