标题: 如何用VBS杀掉除系统以外的进程? [打印本页]

---

作者: luckboy45     时间: 2007-11-27 18:22    标题: 如何用VBS杀掉除系统以外的进程?

我想用VBS循环来杀除系统以外的进程

alg.exe
csrss.exe
explorer.exe
lsass.exe
smss.exe
ctfmon.exe
services.exe
svchost.exe
winlogon.exe
System
System Idle Process
Wscript.exe
cmd.exe
以上是需要保留的进程

用BAT无法实现循环杀进程,用死循环机器会死的.....

for /f "skip=3" %i in ('wmic process get name^|findstr /v /i "smss.exe csrss.exe winlogon.exe services.exe lsass.exe svchost.exe explorer.exe"') do TASKLIST %i

希望能用VBS的DO LOOP来实现循环,常驻内存,每5秒执行一次操作

本人能力不够,无法实现,望各位朋友多多帮忙没，写出代码供大家学习交流

---

作者: luckboy45     时间: 2007-11-27 21:25
这个问题似乎没人知道啊....

---

作者: ZJHJ     时间: 2007-11-27 22:49
用BAT应该可以实现杀除系统以外的进程

---

作者: 35799     时间: 2008-3-7 02:27
这是我用开的，在网上找到。。
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