当前位置:编程学习 > asp >>

如何利用ASP编程实现邮箱访问

您在访问网站时是否会在有些页面上见到这种功能---您在可以访问此网站的同时,还可以查看您免费邮箱中是否有新邮件。这个功能是不是让您觉得很心动、很神秘呢?下面,我就用ASP来举个例子让您知道是如何实现这一功能的
答案:

首先你可以去一些提供免费邮件服务的站点,申请一个账号然后登录。在打开邮箱时,请您注意地址栏中的内容。现在以371为例,你会发现其内容通常是:
    http://www.371.net/prog/login?user=fighter&pass=mypassword。其中"fighter"是您的账号,"mypassword"
  是您的密码。这时我们可以从这里得到3个信息。第1条是我们得到了处理文件的url及文件名:"http://www.371
  .net/prog/login";第2条是记录您账号的变量名:user;第3条是记录您密码的变量名:pass。我们知道这些信息后,就可着手写html文件和asp文件了。
  
  '/*Html源文件内容如下:*/
  <HTML>
  <HEAD>
  <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
  </HEAD>
  <title>City Club 首页</title>
  <style type="text/css">
  <!--
  td { font-size: 9pt}
  body { font-size: 9pt}
  select { font-size: 9pt}
  A {text-decoration: none; color: #003366; font-size: 9pt}
  A:hover {text-decoration: underline; color: #FF0000; font-size: 9pt}
  -->
  </style>
  <script language="javascript">
  function check(tt) {
  if (window.document.form1.selectmail.selectedIndex==0) {
  alert("请选择您的邮箱服务器!")
  window.document.form1.selectmail.focus()
  return false
  }
  if (tt.account.value=="") {
  alert("帐号不能为空!请填写。")
  tt.account.focus()
  return false
  }
  if (tt.account.value.lengthɛ) {
  alert("帐号长度不能小于3位!请填写。")
  tt.account.focus()
  return false
  }
  if (tt.password.value=="") {
  alert("密码不能为空!请填写。")
  tt.password.focus()
  return false
  }
  if (tt.password.value.lengthɛ) {
  alert("密码长度不能小于3位!请填写。")
  tt.password.focus()
  return false
  }
  else
  return true
  }
  </script>
  <BODY topmargin=12>
  <table border=0 bgcolor=d3d3d3>
  <td>
  <form action="PostOffice.asp" method=post Onsubmit="return check(this)" name=form1
  target="_blank"> <!--此处用target="_blank",是为了弹出新窗口来查看您的邮箱-->
  <select style="font-size:9pt;background-color:add8e6" name="selectmail">
  <option name="mailsite" value="City Club便民邮局" selected>City Club便民邮局</option>
  <option name='MailSite' value='990.net/prog/login?;user;pass;'</option>
  <option name='MailSite' value='www.371.net/prog/login?;user;pass;'</option>
  <option name='MailSite' value='www.188.net/prog/login?;user;pass;'</option>
  <option name='MailSite' value='web.163.net/cgi/login?;user;pass;'</option>
  <option name='MailSite' value='freemail.263.net/cgi/login?;user;pass;'</option>
  <option name='MailSite' value='mail.777.net.cn/v2.0/html/mailbox.php3?;user;pass;'</option>
  <option name='MailSite' value='www.126.com/cgi/login?;email;password;'</option>
  <option name='MailSite' value='www.2911.net/cgi-bin/login?;username;password;'

上一个:掌握ASP其实只需要6步
下一个:ASP程序错误详细说明例表

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,