系统520 - 系统光盘下载网站!

当前位置:系统520 > 系统教程 > U盘教程 > 详细页面

怎么利用u盘保存上网登录账号密码实现快速登录?

时间:2020-09-11 来源:系统520 作者:内存

       你有没有发现要上各种网站或者大平台,都要注册才能登录。各种账号密码实在不厌其烦,有一种能帮助您实现保存上网账号密码来快速登录的方式,你会想学吧。就是利用u盘来保存再来快速登录,来看看教程是怎么做到的。

  

咱们如何利用u盘保存上网登录账号密码实现快速登录?

 

  推荐下载:U盘启动盘制作工具

  1.首先,咱们将准备好的U盘插入到win7电脑的USB接口中,等待电脑将自己的U盘识别之后,咱们就返回到电脑的桌面位置。

  2.咱们在桌面找一个空白处,点击鼠标右键,选择新建-文本文档,建立好之后咱们先不要命名,直接双击打开文本文档,将如下的代码复制进去:

  '获取登录哪个邮箱

  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

  设置好之后,咱们将该文本文档设置为pass.vbs格式的文件,这里需要的是,username.Value = "cfan"中引号内的替换为用户名,Password.Value = "cfan"中引号内的替换为密码即可使用。

  以上利用u盘保存上网登录账号密码实现快速登录的方法分享到这里了,大家不要觉得以上的步骤都是代码很难实现,大家只需要根据教程设置好文本之后,就能快速实现功能,希望对大家有帮助哦。

系统教程栏目

栏目热门教程

人气教程排行

站长推荐

热门系统下载