用ASP发 WAP MAIL(=)

2016-01-29 18:13 26 1 收藏

用ASP发 WAP MAIL(=),用ASP发 WAP MAIL(=)

【 tulaoshi.com - ASP 】

  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   
 

来源:http://www.tulaoshi.com/n/20160129/1504861.html

延伸阅读
标签: ASP
  选择电影院和上映时间 这部分代码让用户来选择看什么时间的电影,所有的记录根据前一页所选的电影来决定。在这里来选择电影院和上映时间. movie_id = Request("movie") sqlQuery = "SELECT title FROM movie WHERE Movie_id = " & movie_id set rsMovie = conn.Execute(sqlQuery) movie_title = rsMovie(...
标签: Web开发
选择电影院和上映时间 这部分代码让用户来选择看什么时间的电影,所有的记录根据前一页所选的电影来决定。在这里来选择电影院和上映时间. movie_id = Request(/"movie/") sqlQuery = /"SELECT title FROM movie WHERE Movie_id = /" & movie_id set rsMovie = conn.Execute(sqlQuery) ...
标签: ASP
  搞了这么多年计算机,第一次写文章到网上来!见笑了 程序目的:工作需要,查询企业注册资料的朋友太多了,省得麻烦,在网站上增加了查询功能,居然有人说没有电脑,没电脑也该有个手机吧。用手机查询这样随时随地都行,说干就干,做一个WAP查询,全用记事本写的。 数据库结构如下: 库名:data.mdb 表名:info 字段:id 、企业名...
标签: ASP
       利 用 ASP 开 发 网 络 聊 天 室   合肥 程双明       经 常 在Internet 上 冲 浪 的 网 友 恐 怕 很 少 有 人 没 有 去 过 聊 天 室 胡乱神聊。 你 只 要 稍 微 留 意 一 下 就会 发 现 这 些 聊 天 室 大 多 是 用CGI 程 序 或 者 用JAVA 开 发 的 Applet...
标签: 电脑入门
    QQ Mail一直被很多黑客用来当作重要的入侵工具,主要原因就是它漏洞太多,入侵简单,只要稍稍学过一点黑客技巧的人就能很轻松地将木马种植入你的电脑。 实战QQ Mail漏洞 第一步:打开QQ Mail,选择“新邮件”,点击右上角的“HTML”按钮,“确定”(见图1)。 第二步:邮件内容输入如下内...

经验教程

532

收藏

74

精华推荐

用ASPMail组件实现E_mail自动反馈

用ASPMail组件实现E_mail自动反馈

time琉璃泪

用PHP编程语言开发动态WAP页面

用PHP编程语言开发动态WAP页面

张冰心100

用ASP生成Chart

用ASP生成Chart

那夜丶唯美

微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部