您现在的位置是：网站首页> 编程资料编程资料
如何使用表单发送电子邮件？_编程10000问_
2023-05-25
243人已围观
简介 如何使用表单发送电子邮件？_编程10000问_
如何使用表单发送电子邮件？
formToEmail.htm
' 表单.
收件人:
发送">
formToEmail.asp
' 处理接收和发送邮件.
<%
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 %>
抱歉,邮件发送失败!
<%= result %>
<% End If %>
[1]
