用 ASP 发 WAP Mail 需要以下两个文件:
default.asp
-
response.buffer = true
Response.contentType = "text/vnd.wap.wml"
Response.write "<? xml version =" "1.0%>
<wml>
<card id = "intro">
<p allign = "center">
<big> <strong> 欢迎使用 WAP Mail </strong> </gig>
<br/>
<br/>
<a href = "#send"> 正在发送邮件 ... </a>
</p>
<p>
<small> e8899.com </small>
</p>
</card>
<card id = "ส่ง">
<p>
来自: <อินพุต type = "text" name = "จาก"/> <br/>
发到: <อินพุต type = "text" name = "to"/> <br/>
主题: <อินพุต type = "text" name = "subject"/> <br/>
内容: <อินพุต type = "text" name = "body"/> <br/>
</p>
<p allign = "center">
<do type = "ยอมรับ" label = "ส่ง">
<go href = "mail.asp" method = "post">
<postfield name = "จาก" value = "$ จาก"/>
<postfield name = "to" value = "$ to"/>
<postfield name = "subject" value = "$ subject"/>
<postfield name = "body" value = "$ body"/>
</do>
</do>
</p>
</card>
</wml>