A: In the FAQ “Q: How Can I Check For a Process By Using VBScript,” we looked at finding a process. Here’s how to kill it by using the process Terminate function. This also checks that the process is no longer present:

set objWMIService = GetObject ("winmgmts:")                              foundProc = False                              procName = "winword.exe"                              for each Process in objWMIService.InstancesOf ("Win32_Process")                                  If StrComp(Process.Name,procName,vbTextCompare) = 0 then                                      foundProc = True                                      procID = Process.ProcessId                                  End If                              Next                              If foundProc = True Then                                  WScript.Echo "Found Process (" & procID & ")"                                  WScript.Echo "Killing Process"                                  Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process where ProcessId =" &  procID)                                  For Each objProcess in colProcessList                                          objProcess.Terminate()                                  Next                                  WScript.Sleep(1000) 'wait for a second                                  Set colProcessList = objWMIService.ExecQuery("Select * from Win32_Process where ProcessId =" &  procID)                                  If colProcessList.count = 0 Then                                      WScript.Echo "Process killed"                                  End If                              End If