WSH
strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process") Dim objWShell Set objWShell = CreateObject("WScript.Shell") For Each obj…
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://winscr…
