Help with asp contact form - GoDaddy hosting?

J

Jarod

New member
So I have fixed a couple problems only to find another. Anyone have any ideas with this? I am using GoDaddy for hosting (unfortunately).

ASP Code
<% If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
'*
'* Send Email
'*
Dim strBOD
strBOD = "Name: " & Request.Form("name") & vbCrLf _
& "Email: " & Request.Form("email") & vbCrLf & vbCrLf _
& Request.Form("comments")
Dim objCFG
Set objCFG = Server.CreateObject("CDO.Configuration")
objCFG.Fields.Item(aCDO & "sendusing") = 2
objCFG.Fields.Item(aCDO & "smtpserver") = "smtp.secureserver.net"
objCFG.Fields.Item(aCDO & "smtpserverport") = 25
objCFG.Fields.Update
Dim objCDO
Set objCDO = Server.CreateObject("CDO.Message")
objCDO.Configuration = objCFG
objCDO.From = Request.Form("email")
objCDO.To = "[email protected]"
objCDO.Subject = "Contact Form"
objCDO.TextBody = strBOD
objCDO.Send
Set objCDO = Nothing
Set objCFG = Nothing
End If
%>

Contact Form
<form name="email" action="contact.asp" method="post">
<p>Name:<br>
<input type="text" name="name" size="25"></p>
<p>Email address:<br>
<input type="text" name="email" size="25"></p>
<p>Comments<br>
<textarea rows="10" cols="50" name="comments"></textarea></p>
<input type="submit" value="Send" /></p>

</form>

ERROR
CDO.Message.1 error '80040220'

The "SendUsing" configuration value is invalid.

/contact.asp, line 34
 
Back
Top