Dim WSHShell Set WSHShell = CreateObject("WScript.Shell") For I=1 To 3 Step 1 WScript.Echo I WSHShell.Run "bench1.bat",,TRUE Next
参考
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/script56/html/wsMthRun.asp
http://winscript.s41.xrea.com/wiki/index.php?%5B%5BFAQ%5D%5D