Practical tips: Using ASP to implement mailbox access

Source: Internet
Author: User
Tags generator implement mail reserved variable trim access visual studio
Access | Tips when you visit a Web site, you will see this feature on some pages---you can access the Web site and see if there are any new messages in your free mailbox. Does this feature make you feel very exciting, very mysterious? Below, I use ASP to give an example to let you know how to achieve this function.

First you can go to some sites that provide free mail services, apply for an account and log in. When you open the mailbox, notice the contents of the Address bar. Now take 371 as an example and you'll find that the content is usually: Http://www.371.net/prog/login?user=fighter&pass=mypassword.

Where "fighter" is Your account, "MyPassword" is your password. Then we can get 3 messages from here. 1th, we got the URL and file name of the processing file: "http://www.371. Net/prog/login"; 2nd is the variable name that records your account: User; 3rd is the name of the variable that records your password: pass. Once we know this information, we have the handwritten HTML file and ASP file.

       
        
'/*html source files are as follows: */<HTML> <HEAD> <meta name= "generator" content= "Microsoft Visual Studio 6.0" > </ head> <title>city Club Home </title> <style type= "Text/css" > <!--td {Font-size:9pt} body {Font-si ZE:9PT} select {font-size:9pt} A {text-decoration:none; color: #003366; font-size:9pt} a:hover {Text-decoration:unde Rline; Color: #FF0000; FONT-SIZE:9PT}--> </style> <script language= "javascript" > Function check (TT) {if ( window.document.form1.selectmail.selectedindex==0) {alert ("Please select your mailbox server!") ") Window.document.form1.selectmail.focus () return false} if (tt.account.value==" ") {alert (" Account cannot be empty! ") Please fill in. Tt.account.focus () return false} if (tt.account.value.length<3) {alert ("account length cannot be less than 3 bits!") Please fill in. ") Tt.account.focus () return false} if (tt.password.value==" ") {alert (" Password cannot be blank! ") Please fill in. Tt.password.focus () return false} if (tt.password.value.length<3) {alert ("Password length cannot be less than 3 bits!") Please fill in. ") Tt.password.focus () return false} else return true} </script> <body topmargin=12> <table border=0 bgcolor=d3d3d3> <td> <form action= "PostOffice.asp" Method=post name=form1 target= "_blank" > <!--where target= "_blank" is used to pop up a new window to view your mailbox--> <select " Font-size:9pt;background-color:add8e6 "name=" Selectmail "> <option name=" mailsite "value=" City club convenience Post Office " Selected>city Club Convenience Post Office </option> <option name= ' mailsite ' value= ' 990.net/prog/login?; User;pass; ' >990</option> <option name= ' mailsite ' value= ' Www.371.net/prog/login?; User;pass; ' >371</option> <option name= ' mailsite ' value= ' Www.188.net/prog/login?; User;pass; ' >188</option> <option name= ' mailsite ' value= ' Web.163.net/cgi/login?; User;pass; ' >163</option> <option name= ' mailsite ' value= ' Freemail.263.net/cgi/login?; User;pass; ' >263</option> <option name= ' mailsite ' value= ' mail.777.net.cn/v2.0/html/mailbox.php3?; User;pass; ' >777</option> <option name= ' mailsite ' value= ' Www.126.com/cgi/login?; Email;password; ' >126</option> <option name= ' mailsite ' value= ' Www.2911.net/cgi-bin/login?; Username;password; ' >2911</option> <option name= ' mailsite ' value= ' Hotmail.yn.cninfo.net/prog/login?; User;pass; ' > Yunnan 169</option> <option name= ' mailsite ' value= ' Freemail.china.com/prog/login?; User;pass; ' >china</option> <option name= ' mailsite ' value= ' Freemail.hongkong.com/prog/login?; User;pass; ' > Hong Kong free email </option> <option name= ' mailsite ' value= ' Freemail.netease.com/prog/login?; User;pass; ' >Netease</option> <option name= ' mailsite ' value= ' Lc3.law5.hotmail.com/cgi-bin/dologin?; login;passwd; ' >hotmail</option> <option name= ' mailsite ' value= ' Www.netaddress.com/tpl/Door/login?; userid;passwd; ' >use.net</option> <option name= ' mailsite ' value= ' Www.88998.com/cgi-win/login?; Username;password; ' >88998.com</option> <option name= ' mailsite ' value= ' www.mail.com/mailcom/login.jhtml?; MN;PW; ' > @mail .com</option> </select><br> account: <input type=text name=account size=12 style= "font-size:9pt" ><br> password:< Input Type=password name=password size=12 style= "font-size:9pt" ><br> </td><tr><td align= Center><input type=submit value= "receipt" style= "font-size:9pt" > <input type=reset "Refill value=" style= : 9pt ' > </td> </form> </td> </table> </BODY> </HTML> '/*html source file content End */
       


       
        
'/*postoffice.asp source file contents are as follows: * * <%@ language=vbscript%> <% = True '----------------------------- -----------------------' Author:Peter.yu ' Created date:2000/3/13 ' File Name:PostOffice.asp ' all Rights Reserved. Ownership return City Club '----------------------------------------------------%> <HTML> <HEAD> <meta name= ' Generator "content=" Microsoft Visual Studio 6.0 > </HEAD> <title>city Club Convenience Post Office (all Rights reserved title to CI Ty Club) </title> <BODY> <% Dim str (3) str1 =trim (Request.Form ("Selectmail")) '/* get mail server and user account and password information */For i = 1 to 3 '/* The information obtained above is segmented and given to the array variable * p = InStr (1,str1, ";") STR (i-1) = Mid (str1,1,p-1) str1 = Mid (str1,p+1) next If InStr (1,str (0), "http://") =0 then Websiteurl = "http://" & Str ( 0 Else Websiteurl = str (0) ' * * Mail server address and specified file name for processing */End If Usernam = str (1) '/* account variable name/password = str (2) '/* Password change name/* * Merge character, Get "Http://www.371.net/prog/login?user=fighter&pass=mypassword Characters" * * Mailurl = websiteurl & USErnam & "=" & Trim (Request.Form ("account")) Mailurl = Mailurl & Chr (PDF) & password & "=" & Trim (Re Quest. Form ("password")) Response.Redirect mailurl '/* Open mailbox * *%> </BODY> </HTML> '/*postoffice.asp source file content End * *
       


It's not that hard. In fact, this is not difficult, the key is that you can observe more, find out the rules. So we can use these rules to do a lot of interesting things.

Related Article

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.