vbscript - 如何使用 VBScript 打开 Adob​​e Reader？

Question

我想以编程方式以 PDF 格式填写表单中的某些字段。

我试过这段代码：

Set objAdobe = CreateObject("AcrobatReader.Application")
objAdobe.Visible = True 

我收到“AciceX 组件无法创建对象”错误。

Answer 1

OLE 自动化接口仅由Adob​​e Acrobat提供，Adobe Reader不提供。

如果您安装了 Adob​​e Acrobat，您可以像这样从 VBScript 启动它：

Set oAcrobat = CreateObject("AcroExch.App")
oAcrobat.Show

有关 Acrobat 自动化 API 的完整参考，请参阅本文档的“OLE 自动化”部分。

Answer 2

试试 windows API ShellExecute 函数。不确定 VB 语法（这在 FoxPro 中有效）...

DECLARE INTEGER ShellExecute IN shell32.dll ; 
  INTEGER hndWin, ; 
  STRING cAction, ; 
  STRING cFileName, ; 
  STRING cParams, ;  
  STRING cDir, ; 
  INTEGER nShowWin
cFileName = "d:\MyDocs\myfile.pdf"
cAction = "open"
ShellExecute(0,cAction,cFileName,"","",1)

...但用户必须手动填写字段。