标题: [求助]进程查杀 [打印本页]

---

作者: renzhen     时间: 2008-4-6 06:26    标题: [求助]进程查杀

求救，请那位高手帮忙写一个，可以查杀进程的脚本，最好是VBS！
谢谢！

---

作者: luckboy45     时间: 2008-4-6 09:13
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\cimv2")
Set colProcess = objWMIService.ExecQuery _
("Select * from Win32_Process " )
For Each objProcess In colProcess
Select Case objProcess.caption
Case "Internat.exe"
Case "avp.exe"
Case "ShadowTip.exe"
Case "csrss.exe"
Case "VStart.exe"
Case "lsass.exe"
Case "isserver.exe"
Case "smss.exe"
Case "services.exe"
Case "svchost.exe"
Case "winlogon.exe"
Case "conime.exe"
Case "PowerRemind.exe"
Case "system System Idle Process"
Case Else
objProcess.Terminate()
End Select
Next

---

作者: kida     时间: 2008-4-6 16:11
luckboy45真是够牛的啊.学习下一下子了

---

作者: xtanbmy     时间: 2008-4-10 16:41
强人一个,收了,谢谢!