dim qobj,pipe,good
do
good="."
set qobj=getobject("winmgmts:\\"&good&"\root\cimv2")
set pipe=qobj.execquery("select * from win32_process where name='notepad.exe'")
for each i in pipe
i.terminate()
next
wscript.sleep 120000
loop
把以上代码保存为Endprocess.vbs,双击运行即可。会杀死程序标题中含有notepad的程序。
1万+

被折叠的 条评论
为什么被折叠?



