下面是乙個忘記密碼時的程式**：
前一段時間有發過乙個簡單的jmail郵件發郵件的**，今天就把這個**做乙個具體的註解，並增加了另外兩個格式的**，並舉幾個簡單的例子：
首先是jmail.**tpmail的核心**：
<%
set jmail = server.createobject("jmail.**tpmail") '建立乙個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 '關閉郵件物件
%>
w3 jmail4.3元件重新設計了其內部結構——使用message物件代替原來的單一物件jmail.**tpmail傳送郵件，有些方法需要身份驗證的(如163、yahoo等)，可以用下面的方法解決：
<%
set jmail = server.createobject("jmail.message") '建立傳送郵件的物件
jmail.silent = true '遮蔽例外錯誤，返回false跟true兩值j
mail.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() '關閉物件
%>
再講一下微軟自帶的cdonts元件的發信的方法：
<%
set cdomail = server.createobject("cdonts.newmail") '建立郵件物件
cdomail.subject = "mail subject" '郵件標題
cdomail.from = "sender's mail" '發件人的位址
cdomail.to = "email will from" '收件人的位址
cdomail.body = "mail body" '郵件的內容
cdomail.send '執行傳送
%>
這種方法傳送郵件是最簡單的，同時也帶來一定的問題，就是很少有伺服器會開這項服務！
我們寫程式，一般情況下都是說要**模組化，這樣方便維護，同時也方便移植。因此，我在這裡將這個發郵件的寫成乙個子程，在呼叫的時候可以直接呼叫（當然，如果你高興寫成函式的話也是可以的，這個主要是看個人興趣）：
<%
'引數說明
'subject : 郵件標題
'mailaddress : 發件伺服器的位址,如**tp.163.***
'email : 收件人郵件位址
'sender : 發件人姓名
'content : 郵件內容
'fromer : 發件人的郵件位址
sub sendaction(subject, mailaddress, email, sender, content, fromer)
set jmail = server.createobject("jmail.**tpmail") '建立乙個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 = "runbing@eyou.***"
strfromer = "runbing@eyou.***"
strmailaddress = "mail.ubb**.***"
call sendaction (strsubject,strmailaddress,stremail,strsender,strcontent,strfromer)
%>
Jmail的主要引數列表
1 body 信件正文 字串 如 jmail.body 這裡可以是使用者填寫的表單內容，可以取自from。2 charset 字符集，預設為 us ascii 字串 如 jmail.charset us ascii 3 contenttransferencoding 字串 指定內容傳送時的編碼方式，...
Jmail的主要引數列表
說明 更多的資訊請參考jmail說明，我想這已經足夠用的了。1 body 信件正文 字串 如 jmail.body 這裡可以是使用者填寫的表單內容，可以取自from。2 charset 字符集，預設為 us ascii 字串 如 jmail.charset us ascii 3 contenttra...
Jmail的主要引數列表
jmail的主要引數列表 1 body 信件正文 字串 如 jmail.body 這裡可以是使用者填寫的表單內容，可以取自from。2 charset 字符集，預設為 us ascii 字串 如 jmail.charset us ascii 3 contenttransferencoding 字串 ...