另类QQ登录(超级简单\安全)最近,由于QQ用户以及增值业务的增多,QQ也变得越来越不安全,盗号满天飞。那么,如何在这样的网络情况下保护我们QQ号的安全呢? 在这,就告诉大家一个既能很方便的登录QQ,而又不用重复的输入帐号密码;最重要的是还能有效的保护我们的QQ号码的方法:
一、打开记事本,输入以下代码(蓝色部分删去):
Dim WshShell, QQPath, QQselect
QQPath="C:\Program Files\QQ\QQ.exe" (---------------QQ或彩虹QQ路径)
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "QQ登录"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "123456"(----------------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了,是不是很方便呢?