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

随着手机用户的不断增加，WAP站点如雨后春笋迅速的滋长开来，手机邮箱也不断的出现在人的眼前，笔者也曾经开发了一套手机邮箱的系统，但由于时间仓促再加上后来一直忙于工作事情，系统功能也就再未加强，今日有幸借助于IT168原创网公开出来，与大家共同分享，希望大家可以借题发挥，加强系统功能，能够更好的应用于实际。

测试软件：Opera M3gate

测试机型：Eg730+ Nokia 6681 Moto V3i

邮件组件：W3 Jmail 4.4

一、WML结构介绍

首先我们先对WML的结构作个简单的介绍，以便于大家更好的浏览源码。

〈?xml version="1.0"?〉
　　〈!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" ""〉
　　〈wml〉
　　〈head〉
　　〈access/〉
　　〈meta..../〉
　　〈/head〉
　　〈card〉
　　Some contents...
　　〈/card〉
　　〈wml〉

我们根据以上结构举个最简单的例子：

〈% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %〉
　　〈%Response.ContentType = "text/vnd.wap.wml; charset=UTF-8"%〉
　　〈?xml version="1.0"?〉
　　〈!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" ""〉
　　〈wml〉
　　〈card title="邮件系统"〉
　　〈p〉
　　WML开发邮件系统
　　〈/p〉

　　〈/card〉
　　〈/wml〉

将以上代码存为example.asp,直接通过M3gate查看，具体效如图一。

 

图一

“邮件系统”这一段文字为UTF-8码，为了更好的适用于手机浏览，建议编码格式采用UTF-8,大家可以下载WAP编码转换器对中文进行转换。

由于我们系统采用ASP语言开发，因此在以上代码段前面还需加上以下两段代码：

〈% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %〉

指定IIS以UTF-8的编码格式读取传递过来的串串(表单提交，地址栏传递等),如果需要以GB2312的格式读取，可以将65001换成936。

〈%Response.ContentType = "text/vnd.wap.wml; charset=UTF-8"%〉

指定页面输出格式为WML，并且编码为UTF-8

二、JMail组件功能介绍

W3 Jmail是一个smtp组件，利用它可以发送邮件，支持html格式邮件。你可以访问主页: 下载这个组件。w3 Jmail 发送邮件速度快，功能丰富，并且是免费的。

以下是本系统所要用到的相关函数及属性，如需更详细的资料可以查阅JMail的官方说明。

1、JMAIL.POP3

创建POP3对象

Set pop3 = Server.CreateObject( "JMail.POP3" )

Connect(Username, Password, Server, Port) :

打开并连接POP3服务器，

Username:邮箱用户名

Password:邮箱密码

Server:POP3服务器

Port:服务器端口号，可选项，默认为110

mailbox.Connect "john", "qwerty", "mail.myDomain.com"

Disconnect() :

关闭连结

示例：mailbox.Disconnect