用ASP发 WAP MAIL需要以下两个文件:
default.asp
<%
Response.Buffer = True
Response.ContentType = "text/vnd.wap.wml"
Response.Write "<?xml version=""1.0%>
<wml>
  <card id="Intro" title="e8899.com' WAP Mail">
 <p align="center">
<big><strong>欢迎使用WAP Mail</strong></big>
<br/>
<br/>
<a href="#Send">正在发送邮件 ...</a>
 </p>
 <p>
<small>e8899.com</small>
 </p>
  </card>

  <card id="Send" title="E8899.COM' WAP Mail">
 <p>
来自: <input type="text" name="From"/><br/>
发到: <input type="text" name="To"/><br/>
主题: <input type="text" name="Subject"/><br/>
内容: <input type="text" name="Body"/><br/>
 </p>
 <p align="center">
 <do type="accept" label="Send">
<go href="mail.asp" method="post">
  <postfield name="From" value="$From"/>
  <postfield name="To" value="$To"/>
  <postfield name="Subject" value="$Subject"/>
  <postfield name="Body" value="$Body"/>
</go>
 </do>
 </p>
 </card>
</wml>