bebemau
11-02-2003, 09:32 AM
Hello again,
I read the knowledge base here and found the article on how to use the CDO object. So I basically copied everything and my page runs fine however, the mail did not get sent. Do I have to change the smtp server or the sendusing field?
Heres my code:
set myMessage=createObject("cdo.message")
set myConfig=createObject("cdo.configuration")
set myFields=myConfig.Fields
myFields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
myFields.update
Set myMessage.Configuration = myConfig
myMessage.to="sender@domain.com"
myMessage.From = "receipient@domain.com"
myMessage.Subject = "A prayer was sent"
myMessage.TextBody = strBody
myMessage.Fields.update
myMessage.Send
set myFields=nothing
set myMessage=nothing
set myConfig=nothing
Thanks in advance
I read the knowledge base here and found the article on how to use the CDO object. So I basically copied everything and my page runs fine however, the mail did not get sent. Do I have to change the smtp server or the sendusing field?
Heres my code:
set myMessage=createObject("cdo.message")
set myConfig=createObject("cdo.configuration")
set myFields=myConfig.Fields
myFields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myFields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
myFields.update
Set myMessage.Configuration = myConfig
myMessage.to="sender@domain.com"
myMessage.From = "receipient@domain.com"
myMessage.Subject = "A prayer was sent"
myMessage.TextBody = strBody
myMessage.Fields.update
myMessage.Send
set myFields=nothing
set myMessage=nothing
set myConfig=nothing
Thanks in advance