自动结束强制智能结束.vbs

vbs主要起到运行bat的目地，传参

代码如下:

setwshshell=createobject("wscript.shell")

wshshell.run"针对性进程管理.bat"

wscript.sleep2000

forx=1to30

wscript.sleep1000

wshshell.sendkeys"{enter3}"

next

针对性进程管理.bat

代码如下:

@echooff&setlocalenabledelayedexpansion

ping-n3127.0>nul

ifexisttem.txtdel/f/qtem.txt

echo.正在刷选进程.............

echo>>tem.txtexplorer.exe

echo>>tem.txtSystemIdleProcess

echo>>tem.txtSystem

echo>>tem.txtsmss.exe

echo>>tem.txtcsrss.exe

echo>>tem.txtwinlogon.exe

echo>>tem.txtservices.exe

echo>>tem.txtTheWorld.exe

echo>>tem.txtlsass.exe

echo>>tem.txtsvchost.exe

echo>>tem.txtspoolsv.exe

echo>>tem.txtalg.exe

echo>>tem.txtctfmon.exe

echo>>tem.txtekrn.exe

echo>>tem.txtwdfmgr.exe

echo>>tem.txt360tray.exe

echo>>tem.txtegui.exe

echo>>tem.txtwmiprvse.exe

echo>>tem.txtQQ.exe

echo>>tem.txtcmd.exe

echo>>tem.txtIEXPLORE.EXE

echo>>tem.txtTXPlatform.exe

echo>>tem.txttasklist.exe

echo>>tem.txtconime.exe

echo>>tem.txtsafeboxTray.exe

echo>>tem.txtwscript.exe

for/f"eol=tokens=1,2delims=,"%%iin('tasklist/nh/focsv')do(

findstr/i/x%%item.txt>nul

iferrorlevel1(

echo=============================================================

echo=============================================================

echo%%i位于以下路径

wmicprocesswhereprocessid=%%jgetexecutablepath|findstr/v/i"executablepath"

ntsd-cq-p%%j1>nul2>nul

ping-n1127.0>nul

tasklist|findstr/i%%i>nul

iferrorlevel1(

echo%%i已经完全成功结束

)else(

echo%%i未能完全结束，估计是个流氓程序

)

)

)

deltem.txt&echo结束进程任务基本完成

taskkill/f/imwscript.exe

mshtavbscript:msgbox("我的任务完成了！请看详细信息",,"刷选进程")(window.close)

taskkill/f/imcmd.exe

更多信息请查看IT技术专栏