VBSエラーメッセージ - "行：6、列：1、エラー：（null）、コード：800401E4、ソース：（null）"

Question

私はスクリプティングには新しく、私が個人的に評価したいAutoItを見つけました他のスクリプト技術と一緒に）。誰でもこのコードでエラーが発生していますか（これはVBSエラーか、AutoItについて理解していないと判断できません）？

私はVbsEditと呼ばれるエディタを使用していると私は、次のようなエラーメッセージが表示されます。 "ライン：6、カラム：1、エラー：（ヌル）、コード：800401E4、出典：（ヌル）"

すべての助けに感謝します。 TIA

---

'Start AutoIt server script first 

Set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.Run "h:\AutoItServer.exe" 

Set oAutoIt = GetObject("AutoIt.Application") ' the magic 

WS_OVERLAPPEDWINDOW = &H00CF0000 

hGui = oAutoIt.Call("GUICreate", "VBS AutoIt GUI test", -1, -1, -1, -1, WS_OVERLAPPEDWINDOW) 
hButton = oAutoIt.Call("GUICtrlCreateButton", "Click", 100, 100, 100, 30) 
hButton2 = oAutoIt.Call("GUICtrlCreateButton", "Click me too", 100, 300, 100, 30) 

oAutoIt.Call "WinSetOnTop", "VBS AutoIt GUI test", "", 1 

AW_FADE_IN = &H00080000 
oAutoIt.Call "DllCall", "user32.dll", "bool", "AnimateWindow", "hwnd", hGui, "dword", 1000, "dword", AW_FADE_IN 

oAutoIt.Call "GUISetState" 

Do 
    Select Case oAutoIt.Call("GUIGetMsg") 
     Case -3 
      Exit Do 
     Case hButton 
      oAutoIt.Call "MsgBox", 262144+32+3, "Title", "Bzzz bzz bzzzz", 0, hGUI 
     Case hButton2 
      oAutoIt.Call "Beep", 500, 700 
    End Select 
    Wscript.Sleep(10) 
Loop 

oAutoIt.Call "GUIDelete" 

If oAutoIt.Call("MsgBox", 4 + 48 + 262144, "?", "Kill server?") = 6 Then oAutoIt.Quit 

Answer 1

問題は、それが完全に初期化される前に、オブジェクトを取得しようとしているということです。 （魔法が起こっている行）

試してみてください。WshShell.Run "h:\AutoItServer.exe", 1, trueこれは、スクリプトをautoitserverが起動するまで待ちます。