vbsからバットを実行しようとするとエラー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 

次回のエラー行番号を公開します。