当我尝试从vbs执行bat时，错误800A0401

Question

Set WshShell = WScript.CreateObject( "WScript.Shell" )
Dim strCurDir
strCurDir = WshShell.CurrentDirectory
WshShell.Run  strCurDir & "Advertise.bat", 0, True
Wscript.Sleep(2)
WshShell.Run strCurDir &  "Uninstall.bat", 0, True
Wscript.Sleep(2)
WshShell.Run strCurDir "Install.bat", 0, True

Set WshShell = Nothing
Wscript.quit

我正在尝试在命令行中执行此脚本。我得到

错误800a0401 -预期语句结束。来源:Microsoft VBScript编译错误。

Answer 1

WshShell.Run strCurDir "Install.bat", 0, True

= =>

WshShell.Run strCurDir & "Install.bat", 0, True

下次公布错误行号