scripting pdftk stamp on windows

Question

Я хочу создать скрипт, который использует pdftk для добавления отметки водяного знака в pdf-файлы. После применения штампа выходной файл не нужно переименовывать

Моя проблема: я не знаю, как будет вызываться имя файла, а для pdftk требуется другое имя файла для входных и выходных файлов.

Синтаксис Pdftk достаточно прост:

pdftk inputfile.pdf stamp watermark.pdf output outputfile.pdf 

Я чувствую, что это должно быть тривиальной, что нужно сделать с помощью VBS, но я почесал голову. Помощь очень ценится.

Answer 1

я понял это - с помощью объекта файловой системы для обработки всей папки одного файла в то время, с другой из положил папку:

'create the file system object and the windows shell object 
Set WshShell = WScript.CreateObject("WScript.Shell") 
Set objFSO = CreateObject("Scripting.FileSystemObject") 

'process all the files in the input folder 
Set objFolder = objFSO.GetFolder(strInputPath) 
Set colFiles = objFolder.Files 

For Each objFile in colFiles 

strInputFilePath = chr(34) & objFile.Path & chr(34) 
strOutputFilePath = chr(34) & strOutputPath & objFile.Name & chr(34) 

'build the command 
strCommand = "pdftk " & strInputFilePath & " stamp " & strLetterheadFilePath & " output " & strOutputFilePath 

' execute the command 
WshShell.Run strCommand 
' delete the input file 
objFSO.DeleteFile(objFile.Path) 
Next