Vbscript VBS错误消息-“;第6行,第1列,错误:(null),代码:800401E4,源:(null)";

Vbscript VBS错误消息-“;第6行,第1列,错误:(null),代码:800401E4,源:(null)";,vbscript,autoit,Vbscript,Autoit,我不熟悉脚本编写,偶然发现了AutoIt,我想亲自评估它(以及其他脚本编写技术)。是否有人在这段代码中看到任何错误(我无法确定这是VBS错误还是关于AutoIt的一些我不了解的错误) 我正在使用名为VbsEdit的编辑器,收到如下错误消息: 第6行,第1列,错误:(null),代码:800401E4,源:(null) 谢谢你的帮助。短暂性脑缺血发作 问题是您试图在对象完全初始化之前获取它。(在魔术发生的地方) 请尝试WshShell.Run“h:\AutoItServer.exe”,1,tru

我不熟悉脚本编写,偶然发现了AutoIt,我想亲自评估它(以及其他脚本编写技术)。是否有人在这段代码中看到任何错误(我无法确定这是VBS错误还是关于AutoIt的一些我不了解的错误)

我正在使用名为VbsEdit的编辑器,收到如下错误消息: 第6行,第1列,错误:(null),代码:800401E4,源:(null)

谢谢你的帮助。短暂性脑缺血发作



问题是您试图在对象完全初始化之前获取它。(在魔术发生的地方)


请尝试
WshShell.Run“h:\AutoItServer.exe”,1,true
这会使脚本等待AutoItServer启动。

问题是您试图在对象完全初始化之前获取它。(在魔术发生的地方)


尝试
WshShell.Run“h:\AutoItServer.exe”,1,true
这会使脚本等待AutoItServer启动。

@Mr47:编辑摘要足以描述您的编辑。您不需要再次将其放入内容中。看起来您正在使用中的示例。我将在该线程中而不是在这里发布,因为这是一个非常具体的问题,并且AutoIt社区在stackoverflow上很小/不存在。请尝试在本地光盘上运行它,例如C:而不是(可能)网络或外部光盘H:首先感谢您的评论。Manadar,我把AutoItServer.exe移到了C驱动器上,它仍然在同一个地方爆炸,错误代码相同。不,AutomatedChaos,这也解决不了问题。AutoItserver.exe成功打开,但脚本没有继续,它在第6行等待。如果您等待几分钟,然后关闭服务器exe,脚本将继续并以相同的方式爆炸previously@Mr47:编辑摘要足以描述您的编辑。您不需要再次将其放入内容中。看起来您正在使用中的示例。我将在该线程中而不是在这里发布,因为这是一个非常具体的问题,并且AutoIt社区在stackoverflow上很小/不存在。请尝试在本地光盘上运行它,例如C:而不是(可能)网络或外部光盘H:首先感谢您的评论。Manadar,我把AutoItServer.exe移到了C驱动器上,它仍然在同一个地方爆炸,错误代码相同。不,AutomatedChaos,这也解决不了问题。AutoItserver.exe成功打开,但脚本没有继续,它在第6行等待。如果您等待几分钟,然后关闭服务器exe,脚本将继续并以先前由AutoIt论坛示例脚本的trancexx(AutoItServer的生产者,它提供了从其他脚本语言使用AutoIt功能的方法…)回答的相同方式爆炸。请参阅:由AutoIt论坛示例脚本的trancexx回答(AutoItServer的生产者,它提供了从其他脚本语言使用AutoIt功能的方法…)请参阅:
'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