:: F N D I :: Complaints Form


Complaints
<% if Request("Submit") = "SUBMIT" then Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") ' Change email address here objMail.From = "complaints@fndi.ae" ' Change email address here objMail.To = "fndi@emirates.net.ae" objMail.Subject = "Complaint!" ' THIS is where you can customize message = "
RESPONSE FROM COMPLAINTS FORM
 
Name:" & Request("name") & "
Email: " & Request("email") & "
Complaint: " & Request("complaint") & "
" 'BELOW 2 Lines have to be added in the other files objMail.MailFormat = 0 objMail.BodyFormat = 0 ' THATS THE END OF the new additions objMail.Body = message objMail.Send set objMail = nothing Response.write("You complaint has been received.") else %>
Name:
E-mail:
Complaint:
     
<%end if %>

:: H O M E ::