P
Paul
I am using CDO.Message object with code below. When I execute the .Send
command, I get the following error.
Error: -2147220973
Description: The transport failed to connect to the server.
Note: The SMTP Server and the IIS Server are the same machine.
Anyone come across this error message in the past? This error also occurs
when I use Method #1 where I use the schema reference provided by Microsoft.
Here is the code:
<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
'METHOD #2
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "10.60.19.24"
.Item(cdoSMTPServerPort) = "25"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
command, I get the following error.
Error: -2147220973
Description: The transport failed to connect to the server.
Note: The SMTP Server and the IIS Server are the same machine.
Anyone come across this error message in the past? This error also occurs
when I use Method #1 where I use the schema reference provided by Microsoft.
Here is the code:
<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
'METHOD #2
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "10.60.19.24"
.Item(cdoSMTPServerPort) = "25"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "(e-mail address removed)"
.To = "(e-mail address removed)"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing