如何用asp的jmail元件發郵件的應用

2021-08-22 06:35:33 字數 4472 閱讀 2882

如何用asp的jmail元件發郵件的應用

前一段時間有發過乙個簡單的jmail郵件發郵件的**,今天就把這個**做乙個具體的註解,並增加了另外兩個格式的**,並舉幾個簡單的例子:

首先是jmail.smtpmail的核心**:

<%

set jmail = server.createobject("jmail.smtpmail") '建立乙個jmail物件

jmail.silent = true 'jmail不會丟擲例外錯誤,返回的值為false跟true

jmail.logging = true '啟用使用日誌

jmail.charset = "gb2312" '郵件文字的**為簡體中文

jmail.contenttype = "text/html" '郵件的格式為html的

jmail.serveraddress = "server address" '傳送郵件的伺服器

jmail.addrecipient email '郵件的收件人

jmail.sendername = "sendername" '郵件傳送者的姓名

jmail.sender = "email address" '郵件傳送者的郵件位址

jmail.priority = 1 '郵件的緊急程式,1 為最快,5 為最慢, 3 為預設值

jmail.subject = "mail subject" '郵件的標題

jmail.body = "mail body" '郵件的內容

jmail.addrecipientbcc email '密件收件人的位址

jmail.addrecipientcc email '郵件抄送者的位址

jmail.execute() '執行郵件傳送

jmail.close '關閉郵件物件

%>

w3jmail4.3元件重新設計了其內部結構——使用message物件代替原來的單一物件jmail.smtpmail傳送郵件,有些方法需要身份驗證的(如163、yahoo等),可以用下面的方法解決:

<%

set jmail = server.createobject("jmail.message") '建立傳送郵件的物件

jmail.silent = true '遮蔽例外錯誤,返回false跟true兩值

jmail.logging = true '啟用郵件日誌

jmail.charset = "gb2312" '郵件的文字編碼為國標

jmail.contenttype = "text/html" '郵件的格式為html格式

jmail.addrecipient email '郵件收件人的位址

jmail.from = "email from for sender" '發件人的e-mail位址

jmail.mailserverusername = "username of email" '登入郵件伺服器所需的使用者名稱

jmail.mailserverpassword = "password of email" '登入郵件伺服器所需的密碼

jmail.subject = "mail subject" '郵件的標題

jmail.body = "mail body" '郵件的內容

jmail.prority = 1 '郵件的緊急程式,1 為最快,5 為最慢, 3 為預設值

jmail.send("server address") '執行郵件傳送(通過郵件伺服器位址)

jmail.close() '關閉物件

%>

或<%

set msg = server.createobject("jmail.message")

msg.silent = true

msg.logging = true

msg.charset = "gb2312"

msg.mailserverusername = "..." '輸入smtp伺服器驗證登陸名

msg.mailserverpassword = "..." '輸入smtp伺服器驗證密碼

msg.from = "...@...", 發件人email

msg.fromname = fromname '發件人姓名

msg.addrecipient "...@...","...@..." '收件人email

msg.subject = "test" '主題

msg.body = "this is body!" '正文

msg.send ("smtp server name") 'smtp伺服器位址

set msg = nothing

%> 或

<%

dim jmail

set jmail=server.createobject("jmail.message")

jmail.silent=true

jmail.charset = "gb2312"

jmail.fromname = fromname

jmail.from = frommail

jmail.addrecipient tomail,toname

jmail.subject = mailtitle

jmail.body=mailbody

jmail.mailserverusername = mailserverloginname

jmail.mailserverpassword = mailserverloginpass

jmail.maildomain = mailuserdomain

sendok=jmail.send(mailserver)

if sendok then

send_mail="ok"

else

send_mail="err"

end if

%>

我們寫程式,一般情況下都是說要**模組化,這樣方便維護,同時也方便移植。因此,我在這裡將這個發郵件的寫成乙個子程,在呼叫的時候可以直接呼叫(當然,如果你高興寫成函式的話也是可以的,這個主要是看個人興趣):

<%

'引數說明

'subject : 郵件標題

'mailaddress : 發件伺服器的位址,如smtp.163.com

'email : 收件人郵件位址

'sender : 發件人姓名

'content : 郵件內容

'fromer : 發件人的郵件位址

sub sendaction(subject, mailaddress, email, sender, content, fromer)

set jmail = server.createobject("jmail.smtpmail") '建立乙個jmail物件

jmail.silent = true 'jmail不會丟擲例外錯誤,返回的值為false跟true

jmail.logging = true '啟用使用日誌

jmail.charset = "gb2312" '郵件文字的**為簡體中文

jmail.contenttype = "text/html" '郵件的格式為html的

jmail.serveraddress = mailaddress '傳送郵件的伺服器

jmail.addrecipient email '郵件的收件人

jmail.sendername = sender '郵件傳送者的姓名

jmail.sender = fromer '郵件傳送者的郵件位址

jmail.priority = 1 '郵件的緊急程式,1 為最快,5 為最慢, 3 為預設值

jmail.subject = subject '郵件的標題

jmail.body = content '郵件的內容

'由於沒有用到密抄跟抄送,這裡遮蔽掉這兩句,如果您有需要的話,可以在這裡恢復

'jmail.addrecipientbcc email '密件收件人的位址

'jmail.addrecipientcc email '郵件抄送者的位址

jmail.execute() '執行郵件傳送

jmail.close '關閉郵件物件

end sub

'呼叫此sub的例子

dim strsubject,stremail,strmailadress,strsender,strcontent,strfromer

strsubject = "這是一封用jmail傳送的測試郵件"

strcontent = "jmail元件傳送測試成功!"

stremail = "[email protected]"

strfromer = "[email protected]"

strmailaddress = "mail.18inter.com"

call sendaction (strsubject,strmailaddress,stremail,strsender,strcontent,strfromer)

%>

如何用asp的jmail發郵件?

set msg server.createobject jmail.message msg.silent true msg.logging true msg.charset gb2312 msg.mailserverusername user yourdomain.com 輸入smtp伺服器驗證登陸...

如何用asp的jmail發郵件?

set msg server.createobject jmail.message msg.silent true msg.logging true msg.charset gb2312 msg.mailserverusername user yourdomain.com 輸入smtp伺服器驗證登陸...

JMail元件的使用

在asp程式中用jmail發郵件的比較多,主要是因為多數虛擬主機支援他,其它的支援的較少。下面是乙個jmail發郵件的例子 on error resume next dim jmail,contentid set jmail server.createobject jmail.message jma...