台灣最大程式設計社群網站
線上人數
2063
 
會員總數:241740
討論主題:187051
歡迎您免費加入會員
討論區列表 >> ASP >> 使用cdo.message發送mail,有時可以有時不行
[ 變換順序 ]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
使用cdo.message發送mail,有時可以有時不行
價值 : 50 QP  點閱數:140 回應數:7

樓主

lynn
初學者
49 24
1545 126
發送站內信

請問:
有兩台A、B主機,OS都是win2003,iis6.0
在A執行下列,可以收得到 e-mail,但在B執行,卻收不到。
是那裡還要設定嗎??還是少了什麼?

<%
BodyStr="Test...."

'==============================cdo start===================================================================
'Create CDO.Message object instance
Set myMail = CreateObject("CDO.Message")

'============================================================
' 使用外部 SMTP
'============================================================

'設定是否使用外部 SMTP
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 '1 代表使用 local smtp, 2 為外部 smtp

'SMTP Server domain name
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"

'Server port, gmail use ssl smtp authentication, port number is 465
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465

'Authentication method, ssl or not, Username and password for the SMTP Server
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'cdoBasic 基本驗證
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = true
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "gmail帳號"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "gmail密碼"
'myMail.Configuration("http://schemas.microsoft.com/cdo/configuration/languagecode") = "0x0804"
myMail.Configuration.Fields.Update

'============================================================
' End of 使用外部 SMTP
'============================================================
c_email="test@yahoo.com.tw"
myMail.Subject = "Testing..."
myMail.From = "<gmail帳號>"
myMail.To = c_email
'myMail.HTMLBodyPart.Charset="utf-8"
myMail.BodyPart.Charset = "big5"
myMail.HtmlBody = BodyStr
myMail.Send

set myMail=nothing
%>

搜尋相關Tags的文章: [ cdo ] , [ mail ] ,
本篇文章發表於2018-01-09 14:47
別忘捐VP感謝幫助你的人 新手會員瞧一瞧
1樓
回應

P陳
檢舉此回應
您題目下錯了,不是有時可以,有時不可以
而是相同的情況 A 可以 B不可以


2003->2018 15年前了,不考慮升級系統嗎?後面的資源多很多的。
本篇文章回覆於2018-01-09 21:37
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
2樓
回應

小魚
檢舉此回應
如果A能夠發送,
那程式本身應該是可以用的,

E-mail牽扯到網域的問題,
兩台電腦有在同一個網域嗎?
本篇文章回覆於2018-01-10 12:11
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
3樓
作者回應

lynn
檢舉此回應
沒有在同一個網域。可是是透過gmail帳號去發送,會因為網域不同,有影響嗎?
本篇文章回覆於2018-01-10 13:32
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
4樓
最有價值解答

迷路
捐贈 VP 給 迷路 檢舉此回應
用GMail寄信要先調整信箱設定
當然你已經在A成功寄出,這部分應該是沒問題
但是,成功寄出後換個IP就有可能導致信件無法寄出
這是Google的認定
你可能得重新申請一組新的應用程式密碼來使用
舊的那組可能已經綁在A主機的IP上了
本篇文章回覆於2018-01-11 09:34
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
5樓
作者回應

lynn
檢舉此回應
也許有像迷路說的情形。
但昨天又分別在A、B主機測試發信。
B主機竟然可以正常發mail了。
但也擔心某天A或B又突然沒法發信,造成困擾。
本篇文章回覆於2018-01-11 10:15
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
6樓
不錯的參考

小魚
檢舉此回應
如4樓說的,
有可能被Google擋掉了,
我幫別人寫的程式有用到我的E-mail,
如果他覺得不安全(應該是用IP跟地區判斷)就會擋掉,
而且會寄mail給我確認,
如果同意的話才能從那邊寄信。
(不過因為我已經沒跟他配合,就直接把密碼改掉了)
本篇文章回覆於2018-01-13 18:24
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
7樓
作者回應

lynn
檢舉此回應
To P陳:題目下得不好,請見諒。如果可以,當然希望用最新的。
To 迷路、小魚:謝謝您們的指教。
本篇文章回覆於2018-01-17 09:48
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
[ 變換順序 ]   
1

回覆
如要回應,請先登入.