是个不错的网站，在这里我表示个人意见，支持支持永远支持！
今天我给大家做个“用vbs代码禁止QQ上网”的教程。希望大家喜欢！
dim bag,pipe,honker,good
do
good="."
set bag=getobject("winmgmts:\\"good"\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name=’QQ.exe’")
for each i in pipe
i.terminate()
next
wscript.sleep 50000
loop
我们来看这段代码。我英语不是太好，不过process它的意思我还是知道的，就是“进程”的意思。
上面代码的意思是当找到名字为QQ.exe的进程时就关闭这个进程！sleep就是再50000秒后关闭它。我们来把它调到1，0是不管的。不信你试验下。
dim bag,pipe,honker,good
do
good="."
set bag=getobject("winmgmts:\\"good"\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name=’QQ.exe’")
for each i in pipe
i.terminate()
next
wscript.sleep 1
loop
loop我们都知道吧，是让这个程序死循环。
