如何用(yòng)asp的(de)jmail發郵件？

JMail 組件

Dimac 公司的(de)郵件收發組件，這(zhè)是一個(gè)非常成熟和(hé)強大(dà)的(de)郵件組件。它不但可(kě)以完成發郵件的(de)工作，還(hái)可(kě)以POP收信，并支持收發郵件時(shí)的(de)PGP加密，内置一個(gè)群發郵件的(de)對(duì)象，可(kě)以使群發編程更簡單。

即使是很多(duō)其他(tā)組件也(yě)都能完成的(de)發郵件功能，JMail 的(de)完成也(yě)可(kě)以稱得(de)上最出色的(de)，除了(le)常見的(de)抄送暗送等多(duō)收件人(rén)功能外，它還(hái)支持添加嵌入式圖片附件，并且可(kě)以從URL讀取文件作爲附件。

JMail 的(de)免費版本擁有全部完成的(de)發郵件功能，隻在收郵件和(hé)加密郵件等我們不常用(yòng)到的(de)方面進行了(le)限制。

免費版下(xià)載 | V4中文手冊下(xià)載(PDF) | Smtpmail對(duì)象中文參考下(xià)載(PDF) | 官方網站www.dimac.net
(注意，PDF電子文檔，使用(yòng)Adobe Acrobat Reader閱讀。)

以下(xià)是在asp程序中調用(yòng)jmail組件在線發送郵件的(de)例子：

<%if request("action")="send" then%>
<%

'參數說明(míng)
'Subject : 郵件标題
'MailAddress : 發件服務器的(de)地址,如smtp.163.com
'Email : 收件人(rén)郵件地址
'Sender : 發件人(rén)姓名
'Content : 郵件内容
'Fromer : 發件人(rén)的(de)郵件地址

Sub SendAction(subject, email, sender, content)
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312" ' 郵件字符集，默認爲"US-ASCII"
JMail.From = strMailUser ' 發送者地址
JMail.FromName = sender' 發送者姓名
JMail.Subject =subject
JMail.MailServerUserName = strMailUser' 身份驗證的(de)用(yòng)戶名
JMail.MailServerPassword = strMailPass ' 身份驗證的(de)密碼
JMail.Priority = 3
JMail.AddRecipient(email)
JMail.Body = content
JMail.Send(strMailAddress)
End Sub

'調用(yòng)此Sub的(de)例子
Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer
strSubject = Request("title")
strContent = "用(yòng)戶Email:" & Request("From") & VbCrLf & "電話(huà):" & Request("Tel") & VbCrLf & "内容:" & vbcrlf & Request("content")
strSender = Request("Name")
strEmail = "anybody@163.com" '這(zhè)是收信的(de)地址,可(kě)以改爲其它的(de)郵箱
strMailAddress = "mail.yourdomain.com" '我司企業郵局地址，請使用(yòng) mail.您的(de)域名
strMailUser = "user@yourdomain.com" '我司企業郵局用(yòng)戶名
strMailPass = "mailpassword" '郵局用(yòng)戶密碼

Call SendAction (strSubject,strEmail,strSender,strContent)

%>

<%else%>