'函數(shù)名：sendmail[br]'作 用：用jmail組件發(fā)送郵件[br]'參 數(shù)：mailtoaddress -----收信人信箱[br]' mailtoname -----收信人姓名[br]' subject -----主題[br]' mailbody -----信件內(nèi)容[br]' mailfrom -----發(fā)信人信箱[br]' fromname -----發(fā)信人姓名[br]' priority -----信件優(yōu)先級(jí)[br]' mailserveruser -----登陸郵箱用戶(hù)名[br]' mailserverpass -----登陸郵箱密碼[br]' maildomain -----郵箱域名[br]' mailserver -----發(fā)件smtp服務(wù)器[br]' makle整理于2007年8月29日 qq:30892070[br]'**************************************************[br]function sendmail(mailtoaddress,mailtoname,subject,mailbody,mailfrom,fromname,mailserveruser,mailserverpass,maildomain,mailserver)[br]' on error resume next[br]dim jmail,jmailstat[br]set jmail=server.createobject("jmail.message")[br] if err then[br] err.clear[br] response.write "組件檢測(cè)失敗"[br] jmail.close()[br] set jmail=nothing[br] exit function[br] end if[br]jmail.charset="gb2312" '郵件字符集[br]jmail.silent=true '忽略錯(cuò)誤[br]jmail.contenttype = "text/html" '郵件編碼[br]jmail.addrecipient mailtoaddress,mailtoname '收件人地址[br]jmail.returnreceipt = true '是否收條（驗(yàn)證中）[br]jmail.from = mailfrom '發(fā)件人郵箱[br]jmail.maildomain=maildomain '郵箱所在域名（驗(yàn)證中）[br]jmail.fromname = fromname '發(fā)件人姓名[br]jmail.mailserverusername=mailserveruser '郵箱用戶(hù)名[br]jmail.mailserverpassword=mailserverpass '郵箱密碼[br]jmail.subject=subject '郵件主題[br]jmail.body=mailbody '郵件正文（純文本格式）[br]'jmail.hmtlbody=mailbody '郵件正文（html格式）[br]jmail.priority=1 '郵件等級(jí)，1為加急，3為普通，5為低級(jí)[br]jmailstat=jmail.send(mailserver)[br] if jmailstat then[br] response.write "成功"[br] else[br] response.write "失敗"[br] end if[br]jmail.close()[br]set jmail=nothing[br]end function