我正在尝试创建一个 VBScript,如果它们存在则杀死 3 个进程。
cscript.exe
wscript.exe
和cmd.exe
它需要运行一个 kill 命令,然后检查该进程是否仍然存在,以验证之前的命令是否有效,然后再继续。我添加了一个 sleep 命令,以便在重新检查之前让脚本有时间工作。
我需要这个,以防我制作另一个循环命令最终无限卡住的 VBScript。如果发生这种情况,我计划将此脚本链接到热键作为救命稻草。
如何为此添加更多进程?
' TK CSCRIPT & WSCRIPT & CMD
Set objWMIService = GetObject ("winmgmts:")
foundProc = False
procName1 = "cscript.exe"
For Each Process in objWMIService.InstancesOf ("Win32_Process")
If StrComp(Process.Name,procName1,vbTextCompare) = 0 then
foundProc = True
procID = Process.ProcessId
End If
Next
If foundProc = True Then
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process where ProcessId =" & procID)
For Each objProcess in colProcessList
objProcess.Terminate()
Next
WScript.Sleep(1000) 'wait 1 second before checking if the process still exists
Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process where ProcessId =" & procID)
If colProcessList.count = 0 Then
End If
End If