中文字幕 91_日韩黄色在线_国产三级成人_精品久久久久久中文字幕女_91探花在线观看国产最新_少妇精品网站_国产成人精品2021欧美日韩_激情综合婷婷丁香五月尤物
青島卓信網(wǎng)絡(luò)技術(shù)有限公司
    主頁 / 資訊 / 觀點 / 用比較笨的方法記錄下win2008 郵件服務(wù)器設(shè)立過程

用比較笨的方法記錄下win2008 郵件服務(wù)器設(shè)立過程

發(fā)布人:admin , 瀏覽次數(shù):171 , 發(fā)布時間:2019-05-24 16:06


幾天來關(guān)于郵件組件試了一遍。

因客戶需要購買了阿里云獨立美國服務(wù)器,原空間在西部數(shù)據(jù)用的jmail組件,一直好用

購買服務(wù)器后代碼復(fù)制過來肯定不好用了,原因很簡單,沒有安裝jmail組件

安裝jmail

仍然不好用

百度查出是兼容32位系統(tǒng)問題,按照提示操作并注冊好jmail組件,依然不好用

通過探針,檢測了常規(guī)的郵件組件裝了一遍,還是無效

通過微信求助

找到一哥們給搞定了

重裝win2008服務(wù)器

安裝CMailServer

用QQ郵箱開啟smtp,并通過授權(quán)碼登陸

代碼張貼如下:

<%
Dim objMail 
'初始化aspEmail組件
Set objMail = Server.CreateObject("Persits.MailSender")
'設(shè)定SMTP模式為SSL,端口號為465
objMail.SSL=True
objMail.Port=465
'設(shè)置郵件編碼格式為UTF-8,MIME編碼為Quoted-Prontable,必須有,否則中文亂碼
objMail.CharSet="UTF-8"
objMail.ContentTransferEncoding="Quoted-Prontable"
'設(shè)定郵箱的smtp服務(wù)器地址,如smtp.abc.com,使用時要替換為自己的地址
objMail.Host = "smtp.qq.com"
'設(shè)定發(fā)送者的郵箱地址
objMail.From = "88888@qq.com"
'設(shè)定發(fā)送者顯示的名稱,如不設(shè)置,則顯示發(fā)送者郵箱地址,要編碼為utf-8,否則中文亂碼
objMail.FromName = objMail.EncodeHeader(Sender,"utf-8")
'添加接收者的地址
objMail.AddAddress "le888onid@qd8886an667.com"
'設(shè)置郵件標題,要編碼為utf-8,否則中文亂碼
Subject="標題lu"
objMail.Subject = objMail.EncodeHeader(Subject,"utf-8")
'郵件內(nèi)容為html,根據(jù)實際情況設(shè)置,默認false
objMail.IsHTML = true
'郵件內(nèi)容
objMail.Body = "<div style=""color:red;"">luceshi</div>"
'smtp身份認證信息
objMail.Username="88888@qq.com"
objMail.Password="改成自己的授權(quán)碼"
'發(fā)送郵件
objMail.Send
'完成后釋放資源
Set objMail=nothing
%>

就這么多.....


买车| 鹤岗市| 邵武市| 河西区| 通城县| 桦甸市| 隆安县| 兴义市| 龙江县| 卢氏县| 酉阳| 滨州市| 温泉县| 兴仁县| 农安县| 湛江市| 穆棱市| 阿鲁科尔沁旗| 沙洋县| 曲松县| 临澧县| 青州市| 定远县| 海阳市| 嘉善县| 务川| 汉寿县| 德庆县| 祁阳县| 莫力| 青田县| 碌曲县| 宁乡县| 周至县| 湄潭县| 湖口县| 太白县| 屯留县| 丹巴县| 德化县| 县级市|