网络编程
位置：首页>> 网络编程>> Asp编程>> ASP开发的WAP格式简易邮件系统实例（5）

ASP开发的WAP格式简易邮件系统实例（5）

　来源：IT168　发布时间：2008-06-10 17:00:00　

标签：wap,xml,邮件,jmail,asp

2) 邮件主页面

邮件主页面主要功能为验证登陆页面传过来的用户名与密码是否正确，如果正确则显示相关的邮件操作链接(如图四)，反之则提示密码错误要求重新输入(如图三)。由于某些移动设备不支持跳转，程序尽量避免使用跳转语句。



 

图三 (登陆失败)

邮件主页面源代码： main.asp


<％ @LANGUAGE="VBSCRIPT" CODEPAGE="65001" ％>
　　<％Response.ContentType = "text/vnd.wap.wml; charset=UTF-8"％>
　　<?xml version="1.0" encoding="utf-8"?>
　　<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
　　<wml>
　　<card id="main" title="Sohu-PALM-MAIL平台">
　　<p>
　　<％
　　on error resume next
　　user=request("user")
　　pwd=request("pwd")
　　Set pop3 = Server.CreateObject( "JMail.POP3" )
　　pop3.connect user,pwd,"http://pop3.sohu.com"
　　pop3.Disconnect
　　if err.number<>0 then
　　response.write("登陆错误，请检查用户名密码是否正确！<br/>")
　　response.write("<a href='index.asp'>重新登陆</a></p></card></wml>")
　　response.End()
　　end if
　　response.write("欢迎你"&amp;user&"@sohu.com<br/>")
　　％>
　　<a href="email_title.asp?user=<％=user％>&pwd=<％=pwd％>">收件箱</a><br/>
　　<a href="send.asp?user=<％=user％>&pwd=<％=pwd％>">发件箱</a><br/>
　　<a href="index.asp">重新登陆</a><br/>
　　</p>
　　</card>
　　</wml> 

注：

<a href="email_title.asp?user=<％=user％>&pwd=<％=pwd％>">收件箱</a> 

由于某些移动设备并不支持session，为了更好的应用，故采用url参数传递，遗憾的是这样做安全性不高，为了提高安全性，建议对参数进行明文加密后再进行传递，在接收页面在做相对应的解密处理,当然如果你有什么更好的办法，还请发邮件指出，谢谢。

第一页 上一页 1 2 3 4
5
0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com