如何在vbs中連續執行幾個程序

Question

我有幾個應用程序，我希望執行一個接着另一個。

我該怎麼做？ 我試過這個，但第二個任務從未執行過。

on error resume next 
Set WshShell = CreateObject("WScript.Shell") 

WshShell.Run """C:\Program Files\my folder\do task1.exe.vbs""" 

WshShell.Run """C:\Program Files\my folder\do task2.exe.vbs""" 

msgbox "Finished tasks" 

更新： 上WshShell.Run發現筆記click here

Answer 1

你所缺少的（每ISDi的答案）是運行的第三個參數，告訴它不要等待程序退出（假），在繼續執行代碼之前。

嘗試（如果你想要把你的代碼在一個子程序，而如果好的編碼重複活動的做法）：

'Place all of the following in a .vbs file 

Sub RunApplication(ByVal sFile) 

    Dim WShell : Set WShell = CreateObject("WScript.Shell") 
    WShell.Run Chr(34) & sFile & Chr(34), 8, false 

End Sub 


'Executing apps. 

RunApplication "C:\Program Files\my folder\task1.exe" 
RunApplication "C:\Program Files\my folder\task2.exe" 

Answer 2

WScript.shell的運行方法，可以停止執行的可選參數該腳本直到Run方法返回。

嘗試：以上

WshShell.Run("""C:\YourPathTo\task1.exe""", 1, true) 

第三個參數，在線真告訴解釋繼續腳本的下一行之前要等到這個任務退出。

-isdi-