 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
mail.asp <% Response.Buffer = True Response.ContentType = "text/vnd.wap.wml" Response.Write "<?xml version=""1.0 %> <% Set Mail = Server.CreateObject("Persits.MailSender") \\'--------------------------------------------------------- \\' 你可以修改ISP的邮件服务器 \\' Mail.Host = "pun.chaozhou.gd.cn" \\' \\'--------------------------------------------------------- Mail.From = Request.Form("From") Mail.FromName = Request.Form("From") Mail.AddAddress Request.Form("To"), Request.Form("To") Mail.Subject = Request.Form ("Subject") Mail.Body = Request.Form("Body") + vbCrLf + vbCrLf + _ "_________________________________________________" + vbCrLf + _ " Message sent via Manas\\' WAPMail " + vbCrLf + _ " http://www.e8899.com/" On Error Resume Next Mail.Send Dim Report If Err <> 0 Then Report = "Error: " & Err.Description Else Report = "Message sent to " & Request.Form("To") End If %> <wml> <card title="e8899.com\\'s WAP Mail"> <p> <%= Report %> <br/> <br/> <a href="default.asp#Send">发另一封</a> </p> <p> <small><a href="http://www.e8899.com">e8899.com</a></small> </p> </card> </wml> 返回类别: 教程 上一教程: ASP内置对象详解出色教程 下一教程: 怎样做自己的二级域名（之二） 您可以阅读与"用ASP发 WAP MAIL(=)"相关的教程: · 用ASP发 WAP MAIL(-) · asp+发送email · ASPEMAIL通过Mdaemon的SMTP发信－recipient unknow处理办法 · 在ASP中用EASYMAILOBJECT组件处理EXCHANGE邮件源代码-读取邮件主题和大小 · WAP中的ASP技术(二) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
