传输失败连接到服务器错误

Set emailObj  = CreateObject("CDO.Message") 

emailObj.Sender = "[email protected]" 
emailObj.To  = "[email protected]" 

emailObj.Subject = "Test CDO" 
emailObj.TextBody = "Test CDO" 

Set emailConfig = emailObj.Configuration 

emailConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.live.com" 
emailConfig.Fields("----/smtpserverport") = 465 
emailConfig.Fields("----/sendusing")  = 2 
emailConfig.Fields("----/smtpauthenticate") = 1 
emailConfig.Fields("----/smtpusessl")  = true 
emailConfig.Fields("----/sendusername")  = "[email protected]" 
emailConfig.Fields("----/sendpassword")  = "*****" 

emailConfig.Fields.Update 

emailObj.Send 

If Err.Number = 0 Then 
    MsgBox "Done" 
End If 

If Err.Number <> 0 Then 
    MsgBox "Can't Proceed" 
End If

这是通过live.com发送电子邮件的代码，但我得到“传输失败连接到服务器”错误。任何人都可以帮我解决这个错误吗？传输失败连接到服务器错误

来源

2016-03-31 Tarun Singh

mail.live.com只是一个web服务器（群）：

[email protected]:~ $ nmap mail.live.com 

Starting Nmap 6.47 (http://nmap.org) at 2016-03-31 08:53 CEST 
Nmap scan report for mail.live.com (157.56.198.204) 
Host is up (0.029s latency). 
Other addresses for mail.live.com (not scanned): 157.55.230.252 
rDNS record for 157.56.198.204: origin.du130w.dub130.mail.live.com 
Not shown: 965 closed ports, 33 filtered ports 
PORT STATE SERVICE 
80/tcp open http 
443/tcp open https 

Nmap done: 1 IP address (1 host up) scanned in 8.32 seconds

对于邮件提交到outlook.com使用smtp-mail.outlook.com和端口25或587（见here）。

不确定您是否可以使用Gmail地址向Microsoft邮件服务进行身份验证。

来源

2016-03-31 07:04:52

我也试过这个，但错误仍然相同 –

http://schemas.microsoft.com/cdo/configuration/smtpserver 此链接也不能正常工作。 –

确保您的凭据在outlook.com上正常工作。 –

传输失败连接到服务器错误

回答

相关问题