|
怎樣制作發(fā)送HTML郵件 JMail組件 源碼下載(拋磚引玉篇) 這兩天想做封圖文并茂的ＨＴＭＬ郵件，頭都抓破了，發(fā)現(xiàn)ＦＯＢ里這方面的貼子幾乎沒有（可能是我沒找著），現(xiàn)在看到有篇寫得不錯，轉過來同分享，希望會做的同志們多提供點參考意見
怎樣制作發(fā)送HTML郵件 JMail組件 源碼下載 怎樣制作發(fā)送HTML郵件 JMail組件 源碼下載 今天在論壇上碰到有人在問怎樣制作HTML郵件，現(xiàn)學現(xiàn)賣，以下是記錄的一點心得。 做IT一年多，直到今天才在論壇上碰到有人問怎么制作HTML郵件，真是汗死了。 不過也不是那么落后，雖說是第一次聽說HTML郵件這個字眼，但基本上還是馬上猜到什么是HTML郵件。 首先，可以把現(xiàn)在的郵件分為純文本郵件與HTML郵件，純文本郵件,即只有文字.并且不能設置郵件文字的大小,樣式等；HTML即我們平時瀏覽網站時看到的網頁格式,可以添加圖片,FLASH等等.也可以設置諸如字體大小,顏色等字體樣式，郵件內容會更精彩好看。 要制作、發(fā)送HTML郵件，首先需要服務器端的支持，也是需要在服務器端裝JMail組件。JMail 是 Dimac 公司（www.）推出的ASP發(fā)信組件，可以在ASP、VC、VB、Delphi等開發(fā)工具中調用。和其他發(fā)信組件相比，它具有支持HTML、多收件人、抄送、暗送等特點。4.0以上版本除了具備以上特點外，還有以下優(yōu)點： 1、支持需要發(fā)信認證的SMTP服務器（現(xiàn)在多數(shù)免費郵箱都需要SMTP發(fā)信認證）。 2、當服務器支持SMTP發(fā)信時，JMail可以將信件加入SMTP發(fā)信隊列（速度很快）。 3、支持在HTML郵件中嵌入附件中的圖片。 4、支持POP3收信（不支持WEB收發(fā)信的信箱也可以自己搞定了）。 5、支持PGP加密郵件。 6、支持郵件合并（群發(fā)郵件，每封信可以不同。） 我們要學會發(fā)送HTML郵件，并不需要過多的了解JMail的內容，最開始我們只需要知道如何去調用JMail組件就可以了。如果想對JMail有比較深入的了解，可以去下載AJiang翻譯過的JMail中文手冊，下載地址http://www./luntan/w3jmail4_cn.pdf，英文版的可以到Dimac去下載。 利用JMail來發(fā)送HTML郵件需要指定組件的以下幾個屬性 指定smtp服務器驗證登陸名msg.MailServerUserName = "xxx@xxx.com" 指定smtp服務器驗證密碼 msg.MailServerPassword = "******" 指定發(fā)件人的Email地址 msg.From ="xxx@xxx.com" 指定收件人的Email地址 msg.AddRecipient="xxx@xxx.com" 指定發(fā)送郵件的主題 msg.Subject ="xxxxxx" 指定發(fā)送郵件的正文 msg.Body ="xxxxxx" 指定發(fā)送郵件的HTML正文 msg.HTMLBody ="xxxxxx" 原理不用過多解釋，看一下以下的示例，利用JMail來發(fā)送HTML郵件也就基本入門了。 SendMailEd.asp的源碼 <HTML> <BODY> <% Dim name,msg,SendMail name=Request.Form("name") Set msg = Server.Createobject("JMail.Message") msg.silent = true msg.Logging = true msg.Charset = "gb2312" msg.MailServerUserName = "xxx@xxx.com" '送件郵件的用戶名與密碼 msg.MailServerPassword = "******" msg.From = Request.Form("email") if name<>"" then msg.FromName = name end if msg.AddRecipient Request.Form("toemail") '收件人Email msg.Subject = Request.Form("subject") '信件主題 msg.Body = Request.Form("body") '正文 msg.HTMLBody = Request.Form("htmlbody") 'HTML正文 msg.ReturnReceipt=true msg.Send ("mail.haisheng-ufida.com") 'smtp服務器地址（企業(yè)郵局地址） set msg = nothing if err then SendMail=err.description err.clear else SendMail="OK" end if if SendMail="OK" then%> <p>郵件發(fā)送成功，謝謝使用</p> <%else%> 由于系統(tǒng)錯誤，郵件未能成功發(fā)送 <%end if%> </BODY> </HTML> SendMail.asp的源碼 <HTML> <HEAD><title>用JMail組件發(fā)送郵件</title></HEAD> <BODY> <center><h1>用JMail組件發(fā)送郵件</h1></center> <hr> <form method="post" action="sendmailed.asp"> 請如實填寫以下內容：<br><br> 姓名:<br><input type="text" size="25" name="name"><br> 電子郵件地址:<br><input type="text" size="25" name="email"><br> To電子郵件地址:<br><input type="text" size="25" name="toemail"><br> 主題:<br><input type="text" size="25" name="subject"><br><br> 詳細內容:<br><textarea name="body" cols="40" rows="15" wrap="PHYSICAL"></textarea><br> HTML內容:<br><textarea name="htmlbody" cols="40" rows="15" wrap="PHYSICAL"></textarea><br> <input type="submit" value="寄出"> </form> </BODY> </HTML> 試試吧 打開http://..../sendmail.asp 填入相應的郵件信息，你的第一封HTML郵件就發(fā)送成功了。 |
|
|
