大少爷 发表于 2008-7-27 13:56:00

【分享】另类QQ登录（超级简单\安全）

最近，由于QQ用户以及增值业务的增多，QQ也变得越来越不安全，盗号木马满天飞。那么，如何在这样的网络情况下保护我们QQ号的安全呢？ 在这，就告诉大家一个既能很方便的登录QQ，而又不用重复的输入帐号密码；最重要的是还能有效的保护我们的QQ号码的方法：

一、打开记事本，输入以下代码：

Dim WshShell, QQPath, QQselect
QQPath="C:\Program Files\QQ\QQ.exe"                         （---------------QQ路径）
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "QQ登录"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "34560000"                                 （----------------QQ号码）
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "13688587498"                           （----------------QQ密码）
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"

以上代码的意思是： 首先，使用函数创建一个   对象，然后运行QQ登录文件，接着把焦点移动到号码输入窗口，输入QQ号，再把焦点移动到密码输入窗口，输入密码，最后休眠200毫秒，然后模拟键盘输入回车键。

把红色的部分按自己的情况修改下,并保存为LOGQQ.vbs   

双击这个LOGQQ.vbs文件，就可以登录我们的QQ了，是不是很方便呢？

                        
                     
                               在这里我 《鄙视那些看贴不回的人》。
                                 在这里我 《鄙视那些看贴不回的人》。
                                    在这里我 《鄙视那些看贴不回的人》。

冬至。 发表于 2008-7-27 14:07:48

哦，了解..$41$

LM_C.K. 发表于 2008-7-27 16:24:48

好复杂　哦$43$

xiaogang9010 发表于 2008-7-27 16:39:39

$38$   楼主 不行啊

[发帖际遇]: xiaogang9010护镖失败,遭人白眼被罚威望3.

xiaogang9010 发表于 2008-7-27 16:40:04

$46$   回个帖子 还这么扣我的

danding 发表于 2008-7-27 18:00:16

我用过呵呵不错！

Fire-fox 发表于 2008-7-27 19:42:45

怎么弄啊？？？？

无岸可渡 发表于 2008-7-27 21:37:45

这个看着技术含量蛮高
顶一下

LM_肉肉 发表于 2008-7-28 08:32:16

好像没懂外。。$41$ $41$

[发帖际遇]: 传说浪漫砖头一拍即死,LM_肉肉伙同黑帮偷砖,被警察叔叔发现,落跑时钱包丢了,损失金币21.

alleniverson 发表于 2008-7-28 12:05:07

看起來好複雜哦........
页: [1] 2 3
查看完整版本: 【分享】另类QQ登录（超级简单\安全）