如何以编程方式优化扫描的PDF文件?

时间:2019-02-08 00:51:54

标签: vbscript adobe acrobat

我有一个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语句的注释部分中添加所有帮助将不胜感激。

0 个答案:

没有答案