【发布时间】:2017-12-29 19:25:27
【问题描述】:
我知道有几个线程与此相关,但没有一个回答我的问题。
代码如下(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
使用该代码,我的电脑一切正常。但在其他 PC 上会出现此错误:
CDO.MESSAGE.1 传输无法连接到服务器。
我做过的事情:
- 通过
telnet端口 25、465、587 检查。只有 465 不起作用。 - 将端口更改为 465、25、587。
- 在防病毒软件中排除我的 .exe(此程序)。
我有那些 smtpusessl、autheticate 等。
我不知道该怎么做和检查了。系统是否有可能阻止此类活动?
【问题讨论】:
标签: vbscript cdo.message