Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

CDO MESSAGE on XP OS

Status
Not open for further replies.

GRonken

Programmer
Oct 30, 2003
26
0
0
US
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.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top