自动结束强制智能结束.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技术专栏