Hello
I am trying to update a vb6 program that should send emails directly from a directory on the exchange server. The exe is actually on the server. I am struggling trying to set the correct configuations using the cdosys dll.
The error I am getting says Transport failed to connect to the server.
Does anyone have any experience coding with cdosys and is the right approach to create a bulk email application on exchange server? Thank you for your time in helping me out.
Here is a portion of my code
Set mailMessage = New CDO.Message
Set mailConf = New CDO.Configuration
Set MCFields = mailConf.Fields
MCFields.Item(cdoSendUsingMethod) = cdoSendUsingPort
MCFields.Item(cdoSMPTServerPort") = 25
MCFields.Item(cdoSMTPServer) = "myserver.com"
MCFields.Item(cdoSMTPAuthenticate) = cdoAnonymous
MCFields.Update
Set mailMessage.Configuration = mailConf
I am trying to update a vb6 program that should send emails directly from a directory on the exchange server. The exe is actually on the server. I am struggling trying to set the correct configuations using the cdosys dll.
The error I am getting says Transport failed to connect to the server.
Does anyone have any experience coding with cdosys and is the right approach to create a bulk email application on exchange server? Thank you for your time in helping me out.
Here is a portion of my code
Set mailMessage = New CDO.Message
Set mailConf = New CDO.Configuration
Set MCFields = mailConf.Fields
MCFields.Item(cdoSendUsingMethod) = cdoSendUsingPort
MCFields.Item(cdoSMPTServerPort") = 25
MCFields.Item(cdoSMTPServer) = "myserver.com"
MCFields.Item(cdoSMTPAuthenticate) = cdoAnonymous
MCFields.Update
Set mailMessage.Configuration = mailConf
