中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [求助]进程查杀

renzhen
新手上路

积分 9
发帖 5
注册 2007-7-25
状态离线

『楼主』: [求助]进程查杀

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

2008-4-6 06:26

luckboy45
中级用户

积分 487
发帖 212
注册 2007-4-1
状态离线

『第 2 楼』:

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

逍遥@浪子@反病毒

2008-4-6 09:13

kida
初级用户

积分 139
发帖 63
注册 2007-10-20
状态离线

『第 3 楼』:

luckboy45真是够牛的啊.学习下一下子了

2008-4-6 16:11

xtanbmy
初级用户

积分 47
发帖 31
注册 2008-3-17
状态离线

『第 4 楼』:

强人一个,收了,谢谢!

2008-4-10 16:41

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: