VBS脚本实现网站自动登录

转载请注明出处：http://hooden.blog.51cto.com/user_index.php?action=addblog&job=modify&tid=1597749

每天工作都有一些网站需要进行登录，如邮箱等。总会花一些时间在这个上面，有时候想：如果我还没来到电脑就能登录好给我用多好！省时又省力！

现以http://www.baidu.com为例示范如何使用脚本进行自动登录百度网站(仅限使用IE内核的浏览器，其他网站代码不同)。

1.用IE打开百度知道主页：

2.先要确定登陆的流程：

1)点击主页右上角的登录按键

2)输入用户名和密码

3)点击登录

3.主页上按F12打开源代码，点击“DOM资源管理器”标签(默认)

下面图就是百度登录页面密密麻麻的源代码！

4.查找将要点击或者输入的元素

在右上角的搜索栏输入“登录”查找网页右上角“登录”按键的链接(属性(style)一般是button或者submit或类似缩写，根据上下文代码与网页布局可以确定下图就是了：

5.关于网页元素属性

IE浏览器打开网页时，有很多元素，比如说一个文本框，一个按键，一个图像，一行文字等等。每个元素都会有对应的“name”、“ID”，“style”，“class”等属性。其中的“ID”和“name”属性是我们获取元素关键，理论上每个元素的ID属性都是不同，经常发现会缺省，缺省时默认ID=name。我们通过IE.document.getElementById(“”).value来获取并修改(传递)其属性。

查看到以上“登录”按钮ID=”tj_login”。

这时我们就可以通过IE.document.getElementById(“tj_login”).click来模拟点击该按钮。然后就进入登录页面。

6.继续查找登陆界面关于文本框的元素(账号和用户名)的ID

通过IE.documentgetElementByid(“TANGRAM__PSP_8__userName”).value=””  (账号)

IE.document.getElementByid(“TANGRAM__PSP_8__password”).value=””   (密码)

来分别修改(传递)文本框账户和密码:

如果运行的时候如果发现找不到对象(以上两行确实出现了这种情况)，绝对有四种可能：

1)IE.document.getElementByid中的“byid”有时候要求“i”和“b”要大写或者小写，否则报找不到对象错误。

2)使用ID不可靠，可以尝试用name属性

通过IE.documentgetElementByid(“userName”).value=””  (账号)

IE.document.getElementByid(“password”).value=””   (密码)

总之多试几个总会有的。

3)代码写错

4)其他

7.获取第二个“登录”按键属性

一般通过查找button或者submit等关键字，再结合网页页面布局确认。

通过IE.document.getElementById(“TANGRAM__PSP_8__submit”).click来模拟按键

8.VBS脚本代码及分析：

Dim username,password,IE  ‘定义变量

username = "×××××"  ‘输入用户名

password = "×××××"  ‘输入密码

Set IE =CreateObject("InternetExplorer.Application")   ‘调用IE程序

ie.FullScreen=0            '全屏化IE对象

IE.Visible = True          ‘窗口可视化

IE.Navigate "http://www.baidu.com/"  ‘打开百度网站

Do while IE.ReadyState<> 4 or IE.busy   ‘用循环语句确保网页加载完毕才执行下面操作

wscript.sleep 2000                   ‘设置延迟2000ms

loop

IE.document.getelementByid("tj_login").click          ‘模拟第一次登陆按键的点击

IE.document.getelementByid("userName").value=username   ‘修改(传入)账户

IE.document.getelementByid("password").value=password   ‘修改(传入)密码

Do while IE.ReadyState<> 4 or IE.busy   ‘用循环语句确保网页加载完毕才执行下面操作

wscript.sleep 2000                   ‘设置延迟2000ms

loop

IE.document.getelementById("TANGRAM__PSP_8__submit").click  ‘模拟按第二次登陆键

9.保存代码

把以上代码复制粘贴到TXT文档，另存为*.vbs文件，记得在资源管理器中设置显示文件的后缀名。双击运行即可。还可以添加到系统任务计划以实现每天自动打开某网页。不用每天早上都要重新手动登录。

总结：

这些尝试屡试不爽，登录QQ邮箱什么的应该都可以，只要你用的是IE打开而且IE没有对脚本进行限制，但各网站的登录界面元素属性均不同，所以要做脚本还得查看源代码获取元素属性，多试几次总会成功，本文只是介绍有这么一个方法可以使用。

有些时候要用到验证码识别，VBS貌似也可以，非常麻烦，可查阅http://demon.tw/programming/vbs-authcode.html。

注意：文件记录有用户名和密码，请妥善保管文档，以防泄漏。通过调用其他程序来获取会更安全些，有点麻烦，不再赘述。