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.