91网首页-91网页版-91网在线观看-91网站免费观看-91网站永久视频-91网站在线播放

" + "歡迎您訂閱萬里信息網(wǎng)郵件列表" +""[br]strbody = strbody + "

" + "為了防止出現(xiàn)訂閱錯誤，請您點擊以下鏈接進行確認。謝謝！" + ""[br]strbody = strbody + "

" + "" + "請點擊這里，進行訂閱確認" + ""[br]strbody = strbody + "

" + vbcrlf[br]strbody = strbody + "
"[br]strbody = strbody + "

" + "歡迎再次光臨萬里信息網(wǎng)！" + ""[br]strbody = strbody + ""

'發(fā)送email[br]on error resume next[br]set objemail = server.createobject("persits.mailsender") [br]objemail.host = c_strmailserver[br]objemail.from = "[url=mailto:jiabaoxu@163.net]jiabaoxu@163.net[/url]" [br]objemail.fromname = "china-168.net"[br]objemail.addaddress a_stremail[br]objemail.subject = "訂閱確認" [br]objemail.ishtml = true [br]objemail.charset = "gb2312"[br]objemail.body = strbody[br]objemail.send

'檢察錯誤[br]if err.number = 0 then '如果成功[br]response.write ("

為確保用戶不被騷擾，我們將發(fā)出確認信,請訪問信中的url以確認登記")[br]else '如果失敗則顯示出錯原因[br]response.write ("

郵件發(fā)送出錯，錯誤原因：
")[br]response.write (""&err.description&"") [br]end if

'清場[br]set objemail = nothing[br]end sub

使用該過程：[br]<%[br].....

rtsemail guestmailid,""&email&""[br].....

%>

aspemail組件的應用 當前位置：點晴教程→知識管理交流 →『 技術文檔交流 』 admin 2010年7月7日 23:29 本文熱度 6102 sub sendmail(a_intid , a_stremail)[br]const c_strmailserver = "smtp.163.net"[br]dim objconn,objrs,strsql[br]dim strcontent,strbody,strsubject,objemail strbody = "" [br]strbody = strbody + "" [br]strbody = strbody + ""[br]strbody = strbody + "" + "請您確認" + "" + vbcrlf[br]strbody = strbody + " " + "您好"&a_stremail&"" + "

關鍵字查詢 組件 應用 mail email 相關文章 正在查詢...