<% if Request("Submit") = "SUBMIT" then Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") ' Change email address here objMail.From = "suggestions@fndi.ae" ' Change email address here objMail.To = "fndi@emirates.net.ae" objMail.Subject = "Suggestion!" message = "

RESPONSE FROM SUGGESTIONS FORM
Name:	" & Request("name") & "
Email:	" & Request("email") & "
Complaint:	" & Request("comment") & "

" '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("Your suggestion has been received.") else %>