發送帶附件的HTML格式郵件常式可以帶附件

來源:互聯網
上載者:User
如何通過 ASP 來發送帶附件、格式為 HTML 的郵件?下面提供了一個常式.

<%@ LANGUAGE=VBScript%>
<%
Response.Buffer = True
Response.Expires = 0

'建立對象執行個體
Set myMail = Server.CreateObject("CDONTS.NewMail")

'以下是將要發送的內容
HTML = "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<title>Sending CDONTS Email Using HTML</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body bgcolor=""FFFFFF"">"
HTML = HTML & "<p><font size=7>"
HTML = HTML & "This is a test mail in html<br>"
HTML = HTML & "Mail content here ...</font></p>"
HTML = HTML & "</body>"
HTML = HTML & "</html>"

'寄件者
myMail.From = "somebody@somewhere.com"

'收件者
myMail.To = "nobody@somewhere.com"

'密件副本
myMail.Bcc = "nobody@somewhere.com"

'抄送
myMail.Cc = "nobody@somewhere.com"

'郵件的重要性
' 0 重要性低
' 1 重要性一般(預設)
' 2 重要性高
myMail.Importance = 2

'郵件主題
myMail.Subject = "Test mail in HTML"

'附件(注意 e:\test.txt 指的是伺服器上的位置,如果使用相對路徑,必須用 Server.MapPath 映射為真實路徑)
myMail.AttachFile "e:\test.txt"

'NewMail 對象的文字格式
'0 表示該 Body 可包含超文本置標語言 (HTML)
'1 表示該 Body 只用於純文字(預設值)
myMail.BodyFormat = 0

'NewMail 對象設定編碼
'0 表示將採用 MIME 格式
'1 表示將採用連續的純文字(預設值)
myMail.MailFormat = 0

'給郵件對象的文本賦值
myMail.Body = HTML

'將郵件發出
myMail.Send

'銷毀對象執行個體,釋放記憶體
Set myMail = Nothing
%>



相關文章

Beyond APAC's No.1 Cloud

19.6% IaaS Market Share in Asia Pacific - Gartner IT Service report, 2018

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。