禁止QQ上网的vbs代码

是个不错的网站,在这里我表示个人意见,支持支持永远支持!

今天我给大家做个“用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我们都知道吧,是让这个程序死循环。

好了,我们超做下!

把上面改过的代码存为vbs为扩展名的文件。

运行下!

看到了吧

我的号码下了。。我们再等下看看如何!

更本启动不了!!

我们再把它设置成自启动的就可以了。先停下。没钱了!

好了,我们继续。如何启动我再这里就不说了。我给大家找下资料。。

开机启动程序的几种方法(用来隐藏木马的哦)

1、启动项

开使---程序---启动

2、注册表中

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run

3、最不容易被人发现的组策略中

开始---运行---gpedit.msc

用户配置---管理模版---系统---登录

双击在用户登录时,进行属性设置,选顶设置项中的“已启用”项,并单击显示按钮,然后在添加项目中输入自己要启动的程序路径

4、服务

在服务中把里边的程序替换成自己的木马也可以

%systemroot%\system32\faxsvc.exe

5、msconfig

这个我这里没法演示,2000好像没有这个东西

在运行里打msconfig,然后就可以找到启动,添加或修改都可以

不是很全,还有个地方可以添加启动的,我忘记了,可能是安全策落中!!

大家研究吧。

好了,我们来解决如何再打开我们的QQ。

我们只需要改下参数运行就可以了。。。

又打不开了,我们再来说个方法。就是改文件名。。

这样是打不开的/

这样就解决了。。

好了,就到这里吧

(0)

相关推荐

  • 禁止QQ上网的vbs代码

    是个不错的网站,在这里我表示个人意见,支持支持永远支持! 今天我给大家做个"用vbs代码禁止QQ上网"的教程.希望大家喜欢! dim bag,pipe,honker,good do good="." set bag=getobject("winmgmts:\\"&good&"\root\cimv2") set pipe=bag.execquery("select * from win32_proces

  • 禁止QQ上网的vbs脚本代码

    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 wscrip

  • AutoIT写的禁止QQ运行的程序代码

    if ProcessExists("qq.exe") then                  $QQPID = ProcessExists("qq.exe")                 ProcessClose ($QQPID)         endif =============================================================== Set objWMIService = GetObject("w

  • 支持断点下载的VBS代码

    之前我就介绍过VBScript语言的强大.今天再给出一个支持断点下载的VBS代码. 并附上VBS代码的解析,不懂的朋友可以配合微软的SCRIPT56.CHM文档自学.很简单, VBS的好处就是代码易于理解.基本上每行代码执行功能都用英文表示出来了. 这个代码也是对我以前介绍的VBS下载功能的补充. 老规矩,复制保存为dl.vbe. 不过这个VBS的代码的不同之处不是双击运行,而是在CMD命令行下执行. 下载功能执行的格式是: cscript.exe dl.vbs (目标文件地址) [以下载Met

  • C#开发Windows服务实例之实现禁止QQ运行

    本实例主要实现下面三个基本功能 1.C#开发windows服务 2.禁止QQ等程序运行 3.为windows服务创建自动安装程序 下面针对这三个基本功能进行实现 一.C#开发windows服务 Windows服务在VS以前的版本中叫NT服务,在VS.NET启用了新的名称.用C#创建windows服务不是一件困难的事,下页针对服务创建.启动.停止做详细介绍 1.首先在vs中添加一winform程序KillService 2.在解决方案添加新项中添加Windows服务 3.打开服务页面,切换至代码页

  • 了解VBE VBE则是编译后(加密)的VBS代码

    一.vbe与vb VBE跟VBS差不多,都是VB脚本代码文件,但他们也有不同: VBS是明文代码,就是说可以直接使用记事本编辑: VBE则是编译后(加密)的VBS代码,使用记事本打开不能直接看到源代码.(有些例外) 加密工具有很多,其中常用的是 Microsoft Script Encoder(screnc.exe),此外还有许多. VBE格式在QQ传文件中往往不会被拦截,而VBS格式却会被拦截,这应该是程序设计者的一个失误. 因此,所以很多人没有进行加密而直接改扩展名为"VBE",依

  • 修改ini文件的批处理与vbs代码

    批处理代码: @echo off >tmp.ini for /f "tokens=1* delims=:" %%i in ('findstr /n ".*" 文件位置') do ( if "%%j"=="" (echo.>>tmp.ini) else ( echo %%j|find "被替换内容">nul&&( call set tp=%%j&call ech

  • JS实现从顶部下拉显示的带动画QQ客服特效代码

    本文实例讲述了JS实现从顶部下拉显示的带动画QQ客服特效代码.分享给大家供大家参考,具体如下: 这是一款动画版QQ在线客服代码,从网页顶部下拉出来的QQ客服,下滑结束后有弹性缓冲效果.在世界地图的映衬下,似乎一下子上升了品位.动画效果是由jq实现的,QQ客服的一些信息自己修改下,换成你自己的QQ,上传到网页就可用啦.注:在火狐台chrome浏览器中测试效果会更好. 运行效果截图如下: 在线演示地址如下: http://demo.jb51.net/js/2015/js-top-show-down-

  • 左右悬浮可分组的网站QQ在线客服代码(可谓经典)

    复制代码 代码如下: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <title>左右悬浮可分组的网站

  • 弹出遮罩层后禁止滚动效果【实现代码】

    方法一: $('.shade').bind( "touchmove", function (e) { e.preventDefault(); }); 方法二: $("body,.main").height($(window).height()).css({ "overflow-y": "hidden" }); 以上这篇弹出遮罩层后禁止滚动效果[实现代码]就是小编分享给大家的全部内容了,希望能给大家一个参考,也希望大家多多支持我

随机推荐