如何用VBScript打開Adobe Reader？

Question

我想以編程方式在PDF格式的表單中填寫一些字段。

我試過這段代碼：

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

我得到的 「ActiceX組件不能創建對象」 錯誤。

Answer 1

OLE自動化接口是只能由Adobe Acrobat提供，而不是Adobe Reader。

如果已安裝Adobe Acrobat，您可以從VBScript這樣啓動它：

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

對於Acrobat的自動化API的完整參考，請參閱this document的「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) 

...但用戶必須填寫手工等領域。