Added: July/24/2005 at 9:11am | IP Logged

Hello-- I get the following error when I add the cdo mail code to my page. 

I have tried changing "localhost" to mail.myserver.com and that does not work. This code DOES work on my local IIS when I tested it.  Problem came in when I uplodaed it to server and tried there.  Can anyone help.

ERROR MESSAGE BELOW:
CDO.Message.1 error '80040220'

The "SendUsing" configuration value is invalid.

/hostedTournaments/addMyInfo.asp, line 139
____________________________________________________________ ______
CODE THAT GENERATES THE ERROR

Set objMail = Server.CreateObject("CDO.Message")

objMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMail.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"

objMail.From = Request.Form("email")
objMail.To = "dpruitt@southeastsports.org"
objMail.CC = Request.Form("email")
objMail.Subject = "Invitational Connection"
'Set the e-mail body format (HTMLBody=HTML TextBody=Plain)

'body of email
objMail.HTMLBody = "<font size =3 face = Verdana>" & "<strong>" & Request.Form("coachName") & " is wanting more info on Invitationals" & "</strong>" & "</font>" & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "<font size =2 face = Verdana>" & "Update My Info: " & Request.Form("renew") & "<br>" & "<br>" & "Coach/Contact Name: " & Request.Form("coachName") & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "<font size =2 face = Verdana>" & "Team Name : " & Request.Form("teamName") & "<br>" & "<br>" & "Location: " & Request.Form("city") & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "<font size =2 face = Verdana>" & "Team Age: " & Request.Form("teamAge") & "<br>" & "<br>" & "Team Gender: " & Request.Form("teamGender") & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "<font size =2 face = Verdana>" & "Address: " & Request.Form("address") & "<br>" & "<br>" & "Phone: " & Request.Form("phone") & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "<font size =2 face = Verdana>" & "Email: " & Request.Form("email") & "<br>" & "<br>"
objMail.HTMLBody = objMail.HTMLBody & "Sent at " & Now() & "</font>"

objMail.Send()

Set objMail = Nothing