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

答案：
邮件也可以用表单格式发送吗？我见一个朋友这样做的。
当然可以，用OCXMail就行：
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 %> 

上一个：如何同时处理数据库和页面错误？
下一个：如何随机显示图片计数器？