http://www.britsincrete.net/contactprocess.asp
—————————————
Form generates a:
Microsoft VBScript compilation error ‘800a03ed’
Expected ‘(’
/contactprocess.asp, line 303
Sub onLoad If Request.ServerVariables(“HTTP_METHOD”) = “POST” Then SendMail “info@britsincrete.net”, “info@britsincrete.net”, “Contact Form Submission”, generateFormList() End IfEnd SubSub SendMail(strFrom, strTo, strSubject, strBody)Dim myCDONTSMail ‘Set myCDONTSMail = CreateObject(“CDONTS.NewMail”) ‘myCDONTSMail.Send strFrom, strTo, strSubject, strBody, 1 ‘Set myCDONTSMail = Nothing Set myMail=CreateObject(“CDO.Message”) myMail.Subject=strSubject myMail.From=strFrom myMail.To=strTo myMail.TextBody=strBody myMail.Send End SubPublic Function generateFormList()Dim objElementDim strContent If Request.ServerVariables(“HTTP_METHOD”) = “POST” Then For Each objElement In Request.Form() strContent = strContent & objElement & “:” & vbCrLf strContent = strContent & Request.Form(objElement) & vbCrLf & vbCrLf Next End If generateFormList = strContentEnd Function
But I cannot see where to put the ‘(’
Any help please?