Vbscript 如何在vbs中连续执行多个程序

我有几个应用程序，我想一个接一个地执行

我该怎么做？ 我试过这个，但第二个任务从未执行过

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上找到的注释

您缺少的（根据ISDi的回答）是Run的第三个参数，它告诉它在继续执行代码之前不要等待程序退出（false）

尝试（如果您想将代码放入子例程中，这是重复活动的良好编码实践）：

您缺少的（根据ISDi的回答）是Run的第三个参数，它告诉Run在继续执行代码之前不要等待程序退出（false）

尝试（如果您想将代码放入子例程中，这是重复活动的良好编码实践）：

---

WScript.shell的Run方法有一个可选参数，可以在Run方法返回之前暂停脚本的执行

尝试：

第三个参数，上面一行中的true，告诉解释器在继续执行脚本的下一行之前，等待该任务退出

---

-isdi-

WScript.shell的Run方法有一个可选参数，可以在Run方法返回之前暂停脚本的执行

尝试：

第三个参数，上面一行中的true，告诉解释器在继续执行脚本的下一行之前，等待该任务退出

-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"

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