闲的蛋疼今天~
电脑浏览器记住密码功能好蛋疼~有时候不好用~~登录CMCC-EDU的时候老是要输入帐号。。看了看登录页面的网页源码~~撸起个Vbs脚本~读取配置文件，简单实现了自己登录CMCC-EDU,把帐号存在同级目录下就好。一行帐号，一行密码。
好久不用vbs~都忘记了快~~

1. '自动登录CMCC-EDU
   
2. 'By:Seven 2014/2/25
   
3. On Error Resume Next
   
4. Set WshShell = CreateObject("wscript.Shell")
   
5. Set fso = CreateObject("scripting.filesystemobject")
   
6. Set ie = CreateObject("InternetExplorer.Application")
   
7. Set list = fso.OpenTextFile("帐号.txt")
   
8. ie.Visible=1
   
9. ie.Navigate "www.baidu.com"
   
10. Do Until ie.ReadyState =4 : WScript.Sleep 200 : Loop
    
11. ie.document.getElementByIdx_x("bpssUSERNAME").Value=List.ReadLine
    
12. ie.document.getElementByIdx_x("bpssBUSPWD").Value=List.ReadLine
    
13. Set AllElement=ie.Document
    
14. For i=0 To AllElement.all.length-1
    
15. if AllElement.all(i).tagname="INPUT" Then
    
16. if AllElement.all(i).value="登录" Then
    
17. AllElement.all(i).click
    
18. End If
    
19. End if
    
20. Next

复制代码

效果图

来源：互联网
免责声明：如果侵犯了您的权益，请联系站长（1277306191@qq.com），我们会及时删除侵权内容，谢谢合作！