自己開發的email組件及說明、源檔案

來源:互聯網
上載者:User
mail組件 MyEmail 1.0版使用說明

MyEmial是我自己寫的一個email組件,說實話,叫1.0版有點慚愧,因為有些

功能還未完善,現在的缺點是還不支援html格式,抄送及密送只能支援一個郵件

地址,不過我將在一兩天內完成這些功能。

這個組件包括以下屬性及方法:

屬性:
MailServer : 你的郵件伺服器,也可以是IP形式。
To: 收件者
From: 寄件者
CC: 抄送
BCC: 密送
Subject: 郵件標題
Body: 郵件內容
Attachment: 附件 (目前只能發送一個附件)
IsHtml : 是否html格式(目前不支援)
IfSuccess : 是否成功
ErrText : 出錯原因

方法:
Send() : 發送郵件

下面是一個在asp裡使用這個組件的例子。
<%@ Language=VBScript %>
<%

dim m_objMail
set m_objMail = server.CreateObject ("MyEmail.Email")
m_objMail.MailServer = "server1.domain"
m_objMail.From = "lyp@domain"
m_objMail.To = "lyp@domain"
m_objMail.Subject = "hello , just test my own email com "
m_objMail.Body = "just a text "
m_objMail.Attachment = "d:/bizen/getcategory.sql"
m_objMail.CC = "lyp@domain"
m_objMail.BCC = "lyp@domain"

//發送
m_objMail.Send ()



if m_objMail.IfSuccess then
Response.Write "發送成功!"
else
Response.Write m_objMail.ErrText
end if

set m_objMail = nothing
%>


下載地址:http://homepage.qdcatv.com.cn/bigeagle/myemail.zip

bigeagle

bigeagle@163.net
http://bigeagle.yeah.net



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

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 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。