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

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 

下一次发布的错误行号。