我有一个VBScript文件,该文件循环访问指定的文件夹。我的最终目标是检查文件是否超过25MB,并使用Acrobat 9的“优化扫描的文件”功能来缩小文件的大小。
不幸的是,我不知道Acrobat API中的命令或功能是如何做到这一点的。我可以使用哪些命令来自动化优化扫描文件的过程?
这是在安装了Acrobat 9的本地计算机上运行的VBScript文件。我尝试浏览Acrobat 9的API文档,但似乎找不到答案。
到目前为止,我的代码:
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语句的注释部分中添加所有帮助将不胜感激。