随笔 - 49  文章 - 0 评论 - 19 
<2007年9月>
2627282930311
2345678
9101112131415
16171819202122
23242526272829
30123456

Web Site Traffic Counter

常用链接

留言簿(3)

随笔分类(48)

随笔档案(49)

搜索

  •  

积分与排名

  • 积分 - 65351
  • 排名 - 97

最新评论

阅读排行榜

评论排行榜

关闭除csrss.exe、explorer.exe、lsass.exe、smss.exe、services.exe、svchost.exe、winlogon.exe、system、System Idle Process的所有进程

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 "csrss.exe"
Case "explorer.exe"
Case "lsass.exe"
Case "smss.exe"
Case "services.exe"
Case "svchost.exe"
Case "winlogon.exe"
Case "system System Idle Process"
Case Else
objProcess.Terminate()
End Select
Next


以上是VBS脚本,下面是命令脚本需建一个Process.ini文件,并将不需要关闭的进程放进去

@echo off&Setlocal EnableDelayedExpansion
rem Code by lxmxn # bbs.cn-dos.net

for /f "tokens=1 delims=," %%a in ('tasklist /nh /FO CSV') do (
    for /f "delims=" %%b in (Process.ini) do (
        set /a flag+=1
        if /i not %%a=="%%b" set /a num+=1
    )
    if !flag! equ !num! taskkill /f /im %%a
    set /a flag=num=0
)
echo the end...



posted on 2007-10-16 14:50 疾风随影 阅读(489) 评论(0)  编辑 收藏 引用 所属分类: Script & Batch column
只有注册用户登录后才能发表评论。