时间:2016-02-16来源:新白菜作者:佚名
每次登录某个软件或者网页的时候都需要输入密码账号真是麻烦,而且需要记住的密码账号那么多,哪有那个功夫和时间。所以小编今天要推荐给大家一个小技巧,利用U盘来帮你记住账号密码,而且不需要你手动输入,只要将U盘连接电脑就可以实现自动登入账号啦。想知道如何实现的吗?那就跟小编一起来看看吧。
特荐:U盘装系统
1.新建一个文本文档;更多精彩內容繼續關注新白菜u盤啓動盤制作工具官網www.laomaotao.cn.com。祝朋友天天快樂。
2.在文档总输入以下代码:
(以登录163信箱为例子)
'获取登录哪个邮箱
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 5 '等待5秒,确保网页已打开完毕
ie.document.getElementById("login").Value = "username" '将id为login的表单填为username
ie.document.getElementById("passwd").Value = "密码"
Set ie = Nothing '释放对象占用的内存
Case "1" '第二个登录过程
ie.navigate ""
Wscript.Sleep 5
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
(说明:把其中的网址就是你需要登录的网站或是论坛,将后面的username.Value = "cfan"中引号内的替换为用户名,Password.Value = "cfan"中引号内的替换为密码即可使用。)
3.将文本另存为pass.vbs即可。
Ok,大功告成!以后上网登录网页就不要再抓耳挠腮的想密码了,也不用怕在电脑上保存密码被他人随意登录,只需药双击一个文件,就可以自动打开网页且自动登入账号密码,方便又安全。这么实用又安全的小技能不可错过,有兴趣的小伙伴们快动手试试吧。
更多精彩內容繼續關注新白菜u盤啓動盤制作工具官網www.laomaotao.cn.com。祝朋友天天快樂。
2019-11-06
爱学Excel教程App:一个实用的办公教程软件2019-11-05
音频剪辑大师App:一个功能强大的音频编辑转换软件2019-10-29
一个不可多得的极致简洁的天气软件简天气App:那样记账App是一个简单纯粹并且备受好评的轻量级记账软件;那样记账App仅支持安卓版本。那样记账App支持非常简单的记账方法,点击软件主界面的加号即可开始记账,包括:支出、转账、收入,其中支出和转账的类型你都可以根据自...
2019-10-23
强力监测App是一个颜值极高的手机系统监测软件;强力监测App仅支持安卓版本。 历史文章分享过一款类似的软件:强力清理,但是今天分享的这款软件功能更加强大和全面。 强力监测App支持CPU监测,手机内存监测,电池监测。 其中C...
2019-10-18