ignoring the lack of dim statements(they are at the top of the page) why doesn't this send?
Set objMail = Server.CreateObject("CDONTS.NewMail"
with objMail
.From = "forms@sfcvb.com"
'.To = "jplain@sfcvb.org"
.to=te
'Response.Write te
.Subject = "A postcard from San Francisco!"
'create html email
note = "You've just received a postcard from San Francisco. To view it"
note = note& ",<a href=' & id & ">Click here</a>"
HTML = HTML & "<HTML>"
HTML = HTML & "<HEAD>"
HTML = HTML & "<TITLE>A postcard from San Francisco</TITLE>"
HTML = HTML & "</HEAD>"
HTML = HTML & "<BODY bgcolor=""#FEECCB"">"
HTML = HTML & "<CENTER>" & note
HTML = HTML & "
"
HTML = HTML & "</BODY>"
HTML = HTML & "</HTML>"
'you need TO add these lines FOR the mail
'to be sent in HTML format
objMail.BodyFormat = 0
objMail.MailFormat = 0
Response.Write note 'test to see if the id worked
objMail.Body = HTML
objMail.importance = 0
objMail.Send
Set objMail = nothing
end with
Bastien
There are many ways to skin this cat,
but it still tastes like chicken
Set objMail = Server.CreateObject("CDONTS.NewMail"
with objMail
.From = "forms@sfcvb.com"
'.To = "jplain@sfcvb.org"
.to=te
'Response.Write te
.Subject = "A postcard from San Francisco!"
'create html email
note = "You've just received a postcard from San Francisco. To view it"
note = note& ",<a href=' & id & ">Click here</a>"
HTML = HTML & "<HTML>"
HTML = HTML & "<HEAD>"
HTML = HTML & "<TITLE>A postcard from San Francisco</TITLE>"
HTML = HTML & "</HEAD>"
HTML = HTML & "<BODY bgcolor=""#FEECCB"">"
HTML = HTML & "<CENTER>" & note
HTML = HTML & "
"
HTML = HTML & "</BODY>"
HTML = HTML & "</HTML>"
'you need TO add these lines FOR the mail
'to be sent in HTML format
objMail.BodyFormat = 0
objMail.MailFormat = 0
Response.Write note 'test to see if the id worked
objMail.Body = HTML
objMail.importance = 0
objMail.Send
Set objMail = nothing
end with
Bastien
There are many ways to skin this cat,
but it still tastes like chicken