How to use Foxmail in U disk

How to use Foxmail in U disk

Each login page, you have to enter the user name, password, very troublesome, so that the Web page automatically save passwords, but also afraid of others to use this computer login. If in order to receive the letter, put a green version of the Foxmail in U disk, Occupy space, affect the life of U disk, and the security of the account is not guaranteed.

Now, just double-click a file, you can automatically open the Web page, automatically enter the user name and password and login, very convenient. In addition, this method can be extended to the forum and other input account places. The specific code is as follows:

Tips: How it works

Use the Internetexplorer.application component of the VBS script to open the target Web page, and then use the document property to control the open Web page.

' Get login to which mailbox

Index=inputbox ("0--yahoo" &vbcrlf&vbcrlf& "1--163", "Select Mailbox", 0)

' Create a Internetexplorer.application object

Set ie = CreateObject ("Internetexplorer.application")

Ie. Visible = 1 ' Set the visibility of the Web page

Select Case Index

Case "0" ' when choosing 0--yahoo

Ie.navigate "http://cn.mail.yahoo.com/" ' Open yahoo e-Mail Login page

Wscript.Sleep 5000 ' Wait 5 seconds to make sure the page is open

Ie.document.getElementById ("Login"). Value = "username" "fills in the form with ID login as username

Ie.document.getElementById ("passwd"). Value = "Password"

Set ie = Nothing ' frees memory occupied by objects

Case "1" ' Second login process

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 ' does not select any or out of range and still release object

' When you put the VBS in the encrypted RAR, be sure to use the following FSO to delete the VBS to avoid the account leakage in the temporary folder

Set fso = CreateObject ("Scripting.FileSystemObject")

Set MyFile = fso. GetFile ("Login.vbs")

MyFile.DeletE:set Myfile=nothing:set fso=nothing

Description: Save the script as Pass.vbs, put the URL is you need to log on to the site or forum, the following username.value = "Cfan" in the quotation marks in the replacement of the user name, Password.value = "Cfan" The replacement in quotation marks is a password that can be used. The example above is login to Yahoo and 163 mailbox.

About account security: You may be worried about your account and password written in the VBS script is not safe, you can use the RAR compression encryption, each time you lose a password can be how to log. Of course, RAR compression package password is stronger, so even if someone from the U disk stolen files, their account will be very safe.