当前位置:编程学习 > VB >>

禁止QQ或其他程序上网的vbs脚本代码

黑暗访问者(坏客技术博客)

用vbs查找系统进程,发现qq的进程则杀掉就是这段代码的原理
  dim bag,pipe,honker,good
  do
  good="."
  set bag=getobject("winmgmts:\"&good&"ootcimv2")
  set pipe=bag.execquery("select * from win32_process where name=QQ.exe")
  for each i in pipe
  i.terminate()
  next
  wscript.sleep 1
  loop
大家注意到了上边的QQ.EXE了吧,这个是可以改成其他的,所以这里不单独针对QQ!

补充:软件开发 , Vb ,
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,