检测运行程序，强制电脑关机代码

用txt写这段代码另存为VBS格式：

do
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name=*QQ.exe*")
for each i in pipe
i.terminate()
next
wscript.sleep 1000
loop

系统每1000毫秒检测一次是否运行了QQ.exe这样一个程序，如果运行了，他会自动后台关闭程序，但是对别的运行软件是没有任何影响的。1000毫秒和QQ.exe可以改成你需要的任何时间（比如2分钟检查一次就填写120000，6分钟的时候就要填写360000）和任何你需要结束的进程（比如LOL.exe）你想禁啥禁啥。
想一想，如果有人用你电脑打游戏，打得正爽：马上要高地了，来一波。突然之间，6分钟的时间到了，电脑突然关机。