У меня есть файл VBScript, который проходит через назначенную папку.Моя конечная цель - проверить файлы размером более 25 МБ и использовать функцию «Оптимизировать сканированный файл» в Acrobat 9, чтобы сделать их меньше.
К сожалению, я не знаю команду или функцию в API Acrobat, чтобы это произошло,Какие команды можно использовать для автоматизации процесса оптимизации отсканированных файлов?
Это файл VBScript, работающий на локальном компьютере с установленным Acrobat 9.Я попытался просмотреть документацию по API Acrobat 9, но не могу найти ответ.
Мой код пока:
Const PDF_FOLDER = "Z:\ARM\temp\"
Set gAcro = CreateObject("AcroExch.App")
Set newPD = CreateObject("AcroExch.PDDoc")
Set newAV = CreateObject("AcroExch.AVDoc")
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFolder = fso.GetFolder(PDF_FOLDER).Files
For Each fileObj In oFolder
If fileObj.size/1000000 > 25 Then
newAV.Open PDF_FOLDER & fileObj.Name, fileObj.Name
'//INSERT COMMAND FOR "OPTIMIZE SCANNED FILE"
newAV.Close(1)
End If
Next
В идеале это оптимизирует отсканированный файл, сохраните его для перезаписитекущий, закройте и продолжите итерацию.Буду признателен за любую помощь при заполнении раздела комментариев в операторе if.