现在，只要双击一个文件，就可以自动打开网页，自动输入用户名和密码并登录，方便极了。而且，此方法可以扩展到论坛等输入账号的地方。具体代码如下:
小提示:工作原理
使用vbs脚本的InternetExplorer.Application组件打开目标网页，然后用document属性来对打开的网页进行各种控制。
'获取登录哪个邮箱
index=inputbox("0--yahoo "&vbcrlf&vbcrlf&"1--163"，"选择邮箱"，0)
'创建InternetExplorer.Application对象
Set ie = CreateObject("internetexplorer.application")
ie.Visible = 1 '设置网页的可见性
Select Case Index
Case "0" '当选择0－－yahoo时
ie.navigate "" '打开yahoo邮箱登录页
Wscript.Sleep 5000 '等待5秒，确保网页已打开完毕
ie.document.getElementById("login").Value = "username" '将id为login的表单填为username
ie.document.getElementById("passwd").Value = "密码"
Set ie = Nothing '释放对象占用的内存
Case "1" '第二个登录过程
ie.navigate ""
Wscript.Sleep 5000
ie.document.getElementById("login163").username.Value = "cfan"
ie.document.getElementById("login163").Password.Value = "cfan"
End Select
Set ie = Nothing '没选任何或超出范围时仍要释放对象
'当把vbs放在加密的rar中，一定要用下面FSO对vbs进行删除操作，以免账号泄漏在临时文件夹中
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.GetFile("login.vbs")
myFile.DeletE:set myfile=nothing:set fso=nothing
说明:将脚本保存为pass.vbs，把其中的网址就是你需要登录的网站或是论坛，将后面的username.Value = "cfan"中引号内的替换为用户名，Password.Value = "cfan"中引号内的替换为密码即可使用。上文中的例子是登录雅虎和163信箱。
关于账号安全性的说明:你可能担心自己的账户和密码明文写在vbs脚本中不安全，你可以将它用rar压缩加密，每次输一个密码就可以想怎么登就怎么登。当然，rar压缩包的密码要强，这样即使有人从U盘中偷走了文件，自己的账号也会很安全。
U盘还有这个用处
免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！ 如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com
稳了！魔兽国服回归的3条重磅消息！官宣时间再确认！
昨天有一位朋友在大神群里分享，自己亚服账号被封号之后居然弹出了国服的封号信息对话框。
这里面让他访问的是一个国服的战网网址，com.cn和后面的zh都非常明白地表明这就是国服战网。
而他在复制这个网址并且进行登录之后，确实是网易的网址，也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情，因为以前都没有出现这样的情况，现在突然提示跳转到国服战网的网址，是不是说明了简体中文客户端已经开始进行更新了呢？