CDO.MESSAGE.1 传输无法连接到服务器

Question

我知道有几个线程与此相关，但其中 none 个回答了我的问题。

只是代码 (VBScript)：

With cdomsg.Configuration.Fields
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'NTLM method
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
  .Item("http://schemas.microsoft.com/cdo/configuration/smptserverport") = 587
  .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/smtpconnectiontimeout") = 60
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "robot@gmail.com"
  .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "pass"
  .Update
End With

使用该代码，我的电脑一切正常。但是在其他电脑上出现这个错误：

CDO.MESSAGE.1 The transport failed to connect to the server.

我做过的事情：

正在通过 telnet 端口 25、465、587 检查。只有 465 不工作。
正在将端口更改为 465、25、587。
在 AntiVirus 中排除我的 .exe（这个程序）。

我有 smtpusessl、autheticate 等

我不知道该做什么，也不知道该检查什么。难不成系统屏蔽了这种activity？

Answer 1

我找到了这个问题背后的原因，看来是 ISP 导致的。我已经在 3 台以上的计算机中尝试了 2 个以上的 ISP，比方说 A、B、C。A 和 B 使用相同的代码可以正常工作，但每台计算机都有 C 提供程序错误。使用端口 587 或 465 都可以正常工作。我不太了解这个端口，但都可以正常工作。

CDO.MESSAGE.1 传输无法连接到服务器

CDO.MESSAGE.1 The transport failed to connect to the server

vbscript

cdo.message