A
animedreamer
I am working on an application where I want to allow a user to send a
message to multiple customers at once. I stumbled across CDO and have
some questions regarding how it works. I found the following code on
Microsoft's web site:
'***********************************************************************************************************
set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
' Set the CDOSYS configuration fields to use port 25 on the SMTP
server.
With Flds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") =
cdoSendUsingPort
'ToDo: Enter name or IP address of remote SMTP server.
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")
= "<remote SMTP server>"
..Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")
= 10
.Update
End With
'***********************************************************************************************************
You can specify a SMTP server in the code. My questions is, does this
SMTP server have to be the SMTP server that the recipient uses to
retrieve his or her e-mail or can this be the SMTP server through which
I wish to send the e-mail? My initial testing seems to suggest the
former. Is the latter possible? If so, how do you authenticate
yourself to the SMTP server through which you are sending the e-mail?
Thanks for any and all help.
-Vincent
message to multiple customers at once. I stumbled across CDO and have
some questions regarding how it works. I found the following code on
Microsoft's web site:
'***********************************************************************************************************
set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
' Set the CDOSYS configuration fields to use port 25 on the SMTP
server.
With Flds
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") =
cdoSendUsingPort
'ToDo: Enter name or IP address of remote SMTP server.
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")
= "<remote SMTP server>"
..Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")
= 10
.Update
End With
'***********************************************************************************************************
You can specify a SMTP server in the code. My questions is, does this
SMTP server have to be the SMTP server that the recipient uses to
retrieve his or her e-mail or can this be the SMTP server through which
I wish to send the e-mail? My initial testing seems to suggest the
former. Is the latter possible? If so, how do you authenticate
yourself to the SMTP server through which you are sending the e-mail?
Thanks for any and all help.
-Vincent