When sending a mail message on a XP Box using the CDO.MESSAGE .... The following works, I don't understanf the use of the sch portion .... HOW can I set this without having to reference the schemas at the Microsoft site? Is it possible?
sch = " Set cdoConfig = CreateObject("CDO.Configuration"
With cdoConfig.Fields
.Item(sch & "sendusing"
= 2 ' cdoSendUsingPort
.Item(sch & "smtpserver"
= "mail.lmhealth.org"
.Item("sendusing"
= 1 ' cdoSendUsingPort
.Item("smtpserver"
= "mail.lmhealth.org"
.update
End With
the rest is typical send stuff and works with the above.
sch = " Set cdoConfig = CreateObject("CDO.Configuration"
With cdoConfig.Fields
.Item(sch & "sendusing"
.Item(sch & "smtpserver"
.Item("sendusing"
.Item("smtpserver"
.update
End With
the rest is typical send stuff and works with the above.