如何利用ASP实现邮箱访问

王朝asp·作者佚名  2008-05-30
窄屏简体版  字體: |||超大  

您在访问网站时是否会在有些页面上见到这种功能---您在可以访问此网站的同时,还可以查看您免费邮箱中是否有新邮件。这个功能是不是让您觉得很心动、很神秘呢?下面,我就用ASP来举个例子让您知道是如何实现这一功能的。首先你可以去一些提供免费邮件服务的站点,申请一个账号然后登录。在打开邮箱时,请您注意地址栏中的内容。现在以371为例,你会发现其内容通常是:

http://www.371.net/prog/login?user=fighter%26amp;pass=mypassword。其中"fighter"是您的账号,"mypassword"

是您的密码。这时我们可以从这里得到3个信息。第1条是我们得到了处理文件的url及文件名:"http://www.371

.net/prog/login";第2条是记录您账号的变量名:user;第3条是记录您密码的变量名:pass。我们知道这些信息后,就可着手写html文件和asp文件了。

'/*Html源文件内容如下:*/

City Club 首页

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}

target="_blank"

City Club便民邮局

990

371

188

163

263

777

126

2911

云南169

china

香港免费电邮

Netease

hotmail

use.net

88998.com

@mail.com

帐号:

密码:

'/*Html源文件内容结束*/

'/*PostOffice.asp源文件内容如下:*/

Response.Buffer = true

'----------------------------------------------------

'Author : Peter.yu

'Created Date : 2000/3/13

'File Name : PostOffice.asp

'All Rights Reserved.所有权归City Club

'----------------------------------------------------

%

City Club 便民邮局 (All Rights Reserved所有权归City Club)

dim str(3)

str1 =trim(Request.Form("selectmail")) '/*获取的邮件服务器及用户账号和密码信息*/

for i = 1 to 3 '/*将以上获取的信息进行分割,并赋予给数组变量*/

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://" %26amp; str(0)

else

webSiteURL = str(0) '/*邮件服务器地址及指定处理的文件名*/

end if

usernam = str(1) '/*账号变量名*/

password = str(2) '/*密码变更名*/

'/*合并字符,得到诸如"http://www.371.net/prog/login?user=fighter%26amp;pass=mypassword的字符"*/

mailUrl = webSiteUrl %26amp; usernam %26amp; "=" %26amp; trim(Request.Form("account"))

mailUrl = mailUrl %26amp; chr(38) %26amp; password %26amp; "=" %26amp; trim(Request.Form("password"))

Response.Redirect mailUrl '/*打开邮箱*/

%

'/*PostOffice.asp源文件内容结束*/

不是很难吧,呵呵。其实这个不是很难的,关键在于您能多多观察,找出其中的规律。这样我们就可以利用这些规律做很多很多有意义有趣的事了。

,

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航