神马品牌网省级重点中学:问个VB脚本的问题
来源：百度文库 编辑：神马品牌网 时间：2024/04/27 15:25:34
下面是我编写的一个脚本，目的是阻止某个程序的运行，但是运行时有错误，望高手指教一下：
dim qobj,pipe,good
do
good="."
set qobj=getobject("winmgmts:\\"&good&"\root\cimvz")
set pipe=qobj.execquery("select * from win32_process where name='QQ.exe'")
for each i in pipe
i.terminate()
next
wscript.sleep
loop
dim qobj,pipe,good
do
good="."
set qobj=getobject("winmgmts:\\"&good&"\root\cimvz")
set pipe=qobj.execquery("select * from win32_process where name='QQ.exe'")
for each i in pipe
i.terminate()
next
wscript.sleep
loop
下载保存在Script，然后再开传神外挂上号，上线后点"游戏设置"里的"脚本远行"，再点"脚本文件的右面的"..."那里，
再找到要用的脚本，点打开，就能用了！
用记事本只是作改动和检查时用的（最好下载回来先杀毒后，打开检查下有没不明程序。看清楚再用！)