1

私はスクリプティングに不慣れで、個人的に評価したい AutoIt に出くわしました (他のスクリプティング テクノロジと共に)。このコードにエラーが表示される人はいますか (これが VBS エラーなのか、AutoIt について理解できないものなのか判断できません)。

VbsEdit というエディタを使用していますが、次のようなエラー メッセージが表示されます。

すべての助けに感謝します。ティア

'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
4

1 に答える 1

1

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

autoitserverWshShell.Run "h:\AutoItServer.exe", 1, trueが起動するまでスクリプトを待機させます。

于 2011-05-18T14:16:56.553 に答える