當我嘗試從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

下次發布錯誤行號。