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

来源:http://www.upandashi.com/ 时间:2018-09-09 10:49:13 责任编辑:admin

  现在做网络的朋友很多,小编也算是其中一员吧,身边的很多朋友也都是从事这个行业的,例如小编身边一些做推广的用户,就需要涉及到注册很多的论坛、博客、B2B网站什么的,也就是说,需要记录大量的账户名和密码,不要以为这只是复制粘贴的小事,久而久之,这可是一件十分麻烦的事情。其实,这也并不是没有好的处理方法的,下面,小编就来介绍一下,如何利用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"中引号内的替换为密码即可使用

  • 使用教程
  • PE教程
  • BIOS设置教程
  • 视频教程
  • 常见问题