vbs恢复进程

更新时间2018-10-17 18:42:57

如，1.exe这个进程被挂起，暂停了，怎么恢复他，求代码

Dim WMI,W,AppNameArr,WS,FolderPathSet WMI=getobject("winmgmts:. ootcimv2")set WS=CreateObject("WScript.Shell")' 变量定义AppNameArr=Split("1.exe|2.exe|3.exe|4.exe|5.exe|6.exe|7.exe|8.exe|a.exe|b.exe|c.exe|d.exe|e.exe|f.exe|g.exe|h.exe|i.exe|j.exe|","|")FolderPath="D:"' 结束进程For j=0 To UBound(AppNameArr)   set W=WMI.execquery("select * from win32_process where name='" & AppNameArr(j) & "'")   for each i in W      i.terminate()   NextNext' 运行程序For i=0 To UBound(AppNameArr)   WScript.Sleep 3000   WS.Run folderpath & AppNameArr(i)NextWScript.Sleep 3000WS.Run folderpath & "123.vbs"' 说明：' 1、程序名称在AppNameArr中增减' 2、路径不能含有空格