当前位置: 移动技术网 > IT编程>开发语言>其他编程 > 如何使用表单发送电子邮件?

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

2017年12月08日  | 移动技术网IT编程  | 我要评论

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

formtoemail.htm

' 表单.
<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="
发送">

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 %>
抱歉,邮件发送失败!

<h2>
<%= result %>
</h2>
<% end if %>

[1]

如对本文有疑问, 点击进行留言回复!!

相关文章:

验证码:
移动技术网