最专业的Win10正式版系统下载
当前位置: 番茄花园W10系统使用U盘保存上网登录账号与密码实现快捷登录的攻

番茄花园W10系统使用U盘保存上网登录账号与密码实现快捷登录的攻

发布日期:2016-07-05 作者:Win10正式版官网 来源:www.52xitong.com
       一些用户经常会注册论坛和博客之类的,在默认情况下,每次登录网页的时候都需要我们输入用户名和密码才可登陆的,很是麻烦,而且有时还有可能忘记密码的时候。但是保存账户密码又担心安全问题,担心别人用这台电脑登陆了自己的账号,为了帮忙用户提供一个完美的解决方法,现小编给大家分享番茄花园W10系统使用U盘保存上网登录账号与密码实现快捷登录的攻略,通过此技巧设置后,用户只需用U盘可以做到双击一个文件,就可以自动打开网页,自动输入用户名和密码并登录,非常方便。
 
下面以登录雅虎和163信箱为例,给大家详细介绍,具体操作如下 :



1、在桌面空白处右键新建一个文本文档,将下面代码复制粘贴进去,具体代码内容如下:
'获取登录哪个邮箱
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 "http://cn.mail.yahoo.com/" '打开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 "http://mail.163.com"
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
 
2、选择另存为pass.vbs,以上其中的网址就是你需要登录的网站或是论坛,然后将后面的username.Value = "cfan"中引号内的替换为用户名,Password.Value = "cfan"中引号内的替换为密码即可使用。
 
3、如果担心自己的账户和密码明文写在vbs脚本中不安全,你可将此记事本用rar压缩加密,当然,rar压缩包的密码要强,这样即使U盘丢失或有人拷贝走U盘中的文件,自己的账号也是安全的。
 
    通过以上设置后,只要双击U盘中的这个文件,就可以自动打开网页,自动输入用户名和密码并登录,非常方便。