亚洲一区精品自拍_2021年国内精品久久_男同十八禁gv在线观看_免费观看a级性爱黄片

Article / 文章中心

阿里云windows虛擬主機(jī)利用發(fā)信組件通過企業(yè)郵局的身份驗(yàn)證方法發(fā)送郵件

發(fā)布時(shí)間:2019-07-27 點(diǎn)擊數(shù):1632

如果您已經(jīng)申請(qǐng)購買cdo發(fā)信組件(win2000:CDONTS或者win2003:CDOSYS),并使用企業(yè)郵局接收郵件,由于郵局服務(wù)端具備本地身份驗(yàn)證規(guī)則,如果投遞服務(wù)器(您的站點(diǎn))域名與企業(yè)郵箱域名相同情況下,您的站點(diǎn)投遞的郵件就會(huì)因無法通過企業(yè)郵局的本地身份驗(yàn)證而被拒絕。給您帶來的問題是:“如何通過驗(yàn)證并保證我的正常工作呢?”

 我們只需要在發(fā)信組件程序模板上稍作修改就可以解決,具體方法如下:

一、CDONTS發(fā)信組件

你可以用下面的腳本樣例通過ASP發(fā)送E-MAIL

<%

set newmail=server.CreateObject("cdonts.newmail")

newmail.From="webmaster@www.yourdomain.com"      //以主機(jī)名方式發(fā)送,此方法可以通過服務(wù)端本地身份驗(yàn)證

newmail.value("Reply-To")="test@test.com"    //默認(rèn)回復(fù)地址(發(fā)件人提交的地址),避免被回復(fù)至"webmaster@www.yourdomain.com"

newmail.To = webmaster@yourdomain.com         //企業(yè)郵局收件人地址

newmail.Subject="主題"

newmail.Body = "asp mail"

newmail.BodyFormat =0

newmail.MailFormat =0

newmail.Send

response.write "send ok!"

set newmail=nothing

%>

二、CDOSYS發(fā)信組件

<%

你可以用下面的腳本樣例通過ASP或者ASPX發(fā)送E-MAIL

<% p="">

'以下部分為系統(tǒng)配置,請(qǐng)勿更改

Set objMail = Server.CreateObject("CDO.Message")

Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\InetpubmailrootPickup"

objCDOSYSCon.Fields.Update

Set objMail.Configuration = objCDOSYSCon

'系統(tǒng)配置結(jié)束

'以下為用戶自行更改部分,請(qǐng)由程序員進(jìn)行修改

objMail.From = "webmaster@www.yourdomain.com"   //以主機(jī)名方式發(fā)送,此方法可以通過服務(wù)端本地身份驗(yàn)證

objMail.Fields("urn:schemas:httpmail:reply-to") ="test@test.com"    //默認(rèn)回復(fù)地址(發(fā)件人提交的地址),避免被回復(fù)至"webmaster@www.yourdomain.com"

objMail.Subject = "win2003發(fā)信組件測試"

'把下面的email改成自己的

objMail.To = webmaster@yourdomain.com         //企業(yè)郵局收件人地址

objMail.TextBody = "win2003測試發(fā)信組件正常"

objMail.Send

Set objMail = Nothing

Set objCDOSYSCon = Nothing

%>

<% p="">

以上方法實(shí)際上是在原有樣例的基礎(chǔ)上,通過修改發(fā)件人地址,以及增加設(shè)置默認(rèn)回復(fù)的方法來實(shí)現(xiàn)的,請(qǐng)您參考測試。

阿里云虛擬主機(jī)   阿里云代理商