发新话题
打印

关闭QQ

关闭QQ

Dim a
do while true
    a=1
    for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_   '循环进程
       if ps.name="QQ.exe"   then   '关闭QQ,也可以改成其它的程序
          ps.terminate()
       end if
    next
WScript.Sleep(10000)
loop


把上面的代码保存成.vbs就可以让QQ无法起动
哈哈
坛友请谨慎试验。
QQ:18072680

TOP

少了个点
呵呵

TOP

呵呵厉害啊
少个点也能看出来~ [s:69]

TOP

这下对了 [s:77]

TOP

发新话题
网上报警