CDOSYSエラー '80040213' - サーバーへの接続に失敗しました

Question

IISを実行するWindows Server 2003 R2と従来のASPを使用しているWebサイトがあります。 私たち自身の（外部で）ホストされているoffice365 Exchangeサーバーを使用してCDOSYSを使用して電子メールを送信しようとしました。

私は次のエラー

通常3つのいずれかの問題を意味

CDO.Message.1 error '80040213' 
The transport failed to connect to the server. 

取得：SMTPサーバに応じ 1.不正なSMTPサーバ/ポート 2.不正なログイン/パスワード 3.アドレスではない有効なFROMを（間違ったドメイン）

SMTPサーバーとポートはサプライヤーに応じて正しいです。 これらの詳細を使用してメールアカウントにログインできるので、ログイン/パスワードは正しいです。 FROMアドレスは、ログインに使用しているアカウントと同じです。

Webから交換サーバーにTelnetで接続できますサーバーをそのアドレスとポートに接続する必要があります。そのため、少なくともサーバーから接続することができます。

私は今、問題が何であるかについて迷っています。 誰かが私が見なければならない何かに関する指針を持っていますか？

これは、ウェブサイトが

myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing")=2 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.office365.com" 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=587 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 20 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "username" 
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password" 

Answer 1

を助けている場合

はここで実証済みの構成です。 別の方法でoffice365サーバーに接続する必要がありました。 これですべてがうまくいきます。

Answer 2

を使用している設定では、あなたのセットアップのOffice 365でSMTPリレーをしましたか？ Office 365の管理者から

に行く：

1. [管理]> [取引
2. メールフロー]> [コネクタ
3. をクリックして
4. 新しいSMTP中継コネクタを追加し、 "組織の電子メールサーバー" から選択します」へオフィス365 "
5. コネクタ名と説明
6. を選択してIPアドレスで確認し、WebサーバーIPアドレスを追加してください。
7. 保存

Answer 3

のOffice 365でFields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25

を試してみてください、CDOは、認証を使用する場合でも、ポート25を好むようです。それは私が最終的にこれが解決してしまったまあ

Set iConfg = Server.CreateObject("CDO.Configuration") 
Set Flds = iConfg.Fields 
With Flds 
     .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
     .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.office365.com" 
     .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
     .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
     .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 
     .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = true 
     .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "myusername" 
     .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "mypassword" 
     .Update 
End With 
objMail.Configuration = iConfg