试过了VBS让电脑说话，下一步用VBS代码来整人 - MSCBSC 移动通信论坛

jingpengtao

资深元老

发短消息

关注Ta

积分 33495
帖子 5659
威望 30191 个
礼品券 1636 个
专家指数 4080
注册 2010-4-2
专业方向项目管理
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#1

大中小

使用道具

发表于 2011-06-23 21:37:48 只看楼主

最近大家对于VBS让电脑说话都试过了，下一步用VBS代码来整人。

哈哈，怎么整人呢？很简单，可以让别人的QQ自动掉线。

以下是代码：

strComputer="."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='QQ.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next

在文本里面输入上面的代码：

用文本文件编写后保存为.VBS为后缀的文件，双击后QQ就掉线啦。

如果你在自己上电脑双击了，那么恭喜你你的QQ掉线了，如果发给别人，让别人双击，

哈哈，那么别人的QQ就掉线了。

怎么保存在VBS格式呢？

打开记事本，输入代码之后，选择“文件”——“另存为”

保存类型选择“所有文件”

文件名：aa.vbs

然后保存，桌面上就有了一个VBS文件了。

本人亲自测试过的。

仅供娱乐，不喜勿喷！谢谢！

[ 本帖最后由 jingpengtao 于 2011-6-23 21:39 编辑 ]

扫码关注5G通信官方公众号,免费领取以下5G精品资料

1、回复“LTBPS”免费领取《《中国联通5G终端白皮书》》

2、回复“ZGDX”免费领取《中国电信5G NTN技术白皮书》

3、回复“TXSB”免费领取《通信设备安装工程施工工艺图解》

4、回复“YDSL”免费领取《中国移动算力并网白皮书》

5、回复“5GX3”免费领取《 R16 23501-g60 5G的系统架构1》

6、回复“iot6”免费领取《【8月30号登载】物联网创新技术与产业应用蓝皮书——物联网感知技术及系统应用》

7、回复“6G31”免费领取《基于云网融合的6G关键技术白皮书》

8、回复“IM6G”免费领取《6G典型场景和关键能力白皮书》

共获得 1 次点评我要点评

五年阳光威望 +10 个
· 试了下。真的！你是QQ的克星。详细.. 发表与：2011-6-23 21:43:57

作者的更多帖子

[充值威望，立即自动到帐] [VIP贵宾权限+威望套餐] 另有大量优惠赠送活动，请光临充值中心
充值拥有大量的威望和最高的下载权限，下载站内资料无忧

五年阳光

版主

发短消息

关注Ta

积分 28203
帖子 6028
威望 399985 个
礼品券 1102 个
专家指数 -2657
注册 2010-2-11
专业方向移动通信
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#2

大中小

使用道具

发表于 2011-06-23 21:41:26

你在哪找的呀？

对本帖内容的看法？我要点评

[立即成为VIP会员，百万通信专业资料立即下载，支付宝、微信付款，简单、快速！]

蓝佐

超级版主

发短消息

关注Ta

积分 30601
帖子 4306
威望 34911 个
礼品券 343 个
专家指数 480
注册 2009-2-17
专业方向网优
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#3

大中小

使用道具

发表于 2011-06-23 21:41:58

坏人一个

对本帖内容的看法？我要点评

无论你在什么时候开始，重要的是开始之后就不要停止；
无论你在什么时候结束，重要的是结束之后就不要悔恨。
所有的胜利与征服自己的胜利比起来都是微不足道，
所有的失败与失去自己的失败比起来更是微不足道；
一切伟大的行动和思想都有一个微不足道的开始。

——好好扮演自己的角色，做自己该做的事。

蓝佐

超级版主

发短消息

关注Ta

积分 30601
帖子 4306
威望 34911 个
礼品券 343 个
专家指数 480
注册 2009-2-17
专业方向网优
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#4

大中小

使用道具

发表于 2011-06-23 21:43:27

愚人节过去很久了

哥哥你能不能......

以后大家知道怎么做了吧

你们懂的

对本帖内容的看法？我要点评

无论你在什么时候开始，重要的是开始之后就不要停止；
无论你在什么时候结束，重要的是结束之后就不要悔恨。
所有的胜利与征服自己的胜利比起来都是微不足道，
所有的失败与失去自己的失败比起来更是微不足道；
一切伟大的行动和思想都有一个微不足道的开始。

——好好扮演自己的角色，做自己该做的事。

jingpengtao

资深元老

发短消息

关注Ta

积分 33495
帖子 5659
威望 30191 个
礼品券 1636 个
专家指数 4080
注册 2010-4-2
专业方向项目管理
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#5

大中小

使用道具

发表于 2011-06-23 21:45:15 只看楼主

淡定好吗，给大家娱乐娱乐啦！

对本帖内容的看法？我要点评

gcen

初级会员

发短消息

关注Ta

积分 95
帖子 19
威望 5908 个
礼品券 0 个
专家指数 0
注册 2010-11-28
专业方向通信
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#6

大中小

使用道具

发表于 2011-06-23 21:54:18

哇，如果是愚人节还敢，现在不敢整人啊。

对本帖内容的看法？我要点评

[2分钟拥有VIP权限和充足威望，可下载站内任何资料] [快速找到一份高薪的通信行业职位]

蓝佐

超级版主

发短消息

关注Ta

积分 30601
帖子 4306
威望 34911 个
礼品券 343 个
专家指数 480
注册 2009-2-17
专业方向网优
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#7

大中小

使用道具

发表于 2011-06-23 21:58:10

QUOTE:

原帖由 gcen 于 2011-6-23 21:54:18 发表

哇，如果是愚人节还敢，现在不敢整人啊。

就是咯大家继续

对本帖内容的看法？我要点评

无论你在什么时候开始，重要的是开始之后就不要停止；
无论你在什么时候结束，重要的是结束之后就不要悔恨。
所有的胜利与征服自己的胜利比起来都是微不足道，
所有的失败与失去自己的失败比起来更是微不足道；
一切伟大的行动和思想都有一个微不足道的开始。

——好好扮演自己的角色，做自己该做的事。

qinxuefengrru

中级会员

发短消息

关注Ta

积分 1167
帖子 251
威望 960 个
礼品券 0 个
专家指数 -88
注册 2011-3-18
专业方向 WCDMA网络优化
来自四川
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#8

大中小

使用道具

发表于 2011-06-23 22:13:42

太坏了，楼猪！！！
不过，跟你商量个事情，能给个更狠点的吗？

共获得 1 次点评我要点评

jingpengtao 威望 +5 个
· 额，等有了就告诉你详细.. 发表与：2011-6-23 22:33:23

[2分钟拥有VIP权限和充足威望，可下载站内任何资料] [快速找到一份高薪的通信行业职位]

20110407

新手上路

发短消息

关注Ta

积分 -75
帖子 44
威望 1792 个
礼品券 15 个
专家指数 -295
注册 2011-5-27
专业方向网络通信
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#9

大中小

使用道具

发表于 2011-06-23 22:29:50

牛牛！！

对本帖内容的看法？我要点评

[2分钟拥有VIP权限和充足威望，可下载站内任何资料] [快速找到一份高薪的通信行业职位]

ffwoo5060

金牌会员

发短消息

关注Ta

积分 6228
帖子 1096
威望 418869 个
礼品券 111 个
专家指数 259
注册 2008-7-12
专业方向网络优化
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#10

大中小

使用道具

发表于 2011-06-24 08:56:27

LZ太有才了！下一次会不会更劲爆，期待ing···

对本帖内容的看法？我要点评

真正的爱一个人，
就会淡然贫贱，安然进退；
就会和他用一个频率呼吸，用一个节奏心跳；
就会用自己的寂寞驱赶他的寂寞，用自己的孤独温暖他的孤独。

迷失的晓野

中级会员

发短消息

关注Ta

积分 1086
帖子 234
威望 21608 个
礼品券 0 个
专家指数 -84
注册 2010-10-21
专业方向通信工程
回答问题数 0
回答被采纳数 0
回答采纳率 0%

#11

大中小

使用道具

发表于 2011-06-24 11:51:21

vbs是不是也可以编辑病毒啊？

对本帖内容的看法？我要点评

[2分钟拥有VIP权限和充足威望，可下载站内任何资料] [快速找到一份高薪的通信行业职位]

快速回复主题
标题
内容	上传资料请点左侧【添加附件】


	您即将访问其它网站关闭您即将访问的地址是其它网站的内容，MSCBSC将不再对其安全性和可靠性负责，请自行判断是否继续前往继续访问取消访问，关闭

共获得 1 次点评 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

共获得 1 次点评 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

对本帖内容的看法？ 我要点评

您即将访问其它网站关闭

共获得 1 次点评我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

共获得 1 次点评我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评

对本帖内容的看法？我要点评