当前位置：首页 > 资讯 > 技术文档

如何使用表单发送电子邮件？

时间：2022-05-21 22:44 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何使用表单发送电子邮件？

[h2]如何使用表单发送电子邮件？[/h2][u]formToEmail.htm

[/u]

' 表单. <FORM METHOD="POST" ACTION="formToEmail.asp"> <P> 收件人: <INPUT SIZE=30 NAME="recipient" MAXLENGTH=200> <P> 发件人: <INPUT SIZE=30 NAME="sender" MAXLENGTH=200> <P> 主题: <INPUT SIZE=30 NAME="subject" MAXLENGTH=512> <P> 内容一: <TEXTAREA ROWS=2 COLS=60 NAME="messageline1"> </TEXTAREA> <P> 内容二: <TEXTAREA ROWS=2 COLS=60 NAME="messageline2"> </TEXTAREA> </PRE> <INPUT TYPE=submit VALUE="发送"> [u]formToEmail.asp

[/u]

' 处理接收和发送邮件. <% Set mailer = Server.CreateObject("ASPMAIL.ASPMailCtrl.1") recipient = Request.Form("recipient") sender = Request.Form("sender") subject = Request.Form("subject") message = Request.Form("messageline1") message = message & vbCRLF message = message & vbCRLF message = message & Request.Form("messageline2") mailserver = "www.intels.net"

' 写上邮件服务器.

result = mailer.SendMail(mailserver, recipient, sender, subject, message) %> <% If "" = result Then %> 恭喜,邮件发送成功! <% Else %> 抱歉,邮件发送失败!

<H2> <%= result %> </H2> <% End If %> [b][1][/b]

全部评论(0)

上一篇：如何将访问者数目周期性地保存？
下一篇：如何实现某些页面只让特定的用户浏览？

资讯排行榜
更多>>