%
if request("submit") <> "" then
DIM MyBody, MyCDONTSMail, dataConn, sSql, rs, the_email, the_order_no, the_text
MyBody = "
" & request.form( "1" ) &_
"
" & request.form("2") &_
"
" & request.form("3") &_
"
" & request.form("4") &_
"
" & request.form("5") &_
"
Name: " & request.form("name") &_
"
Email: " & request.form("email") &_
"
Client Ref: " & request.form("reference")
Set MyCDONTSMail = CreateObject("CDONTS.NewMail")
MyCDONTSMail.From = "noreply@gibson-appleby.co.uk"
'MyCDONTSMail.To = "recruitment@klicka.com"
'MyCDONTSMail.To = "luke.allport@hotmail.co.uk"
MyCDONTSMail.To = "evelyn.thomas@gibson-appleby.co.uk"
MyCDONTSMail.Subject = "Fee Protection Registration"
MyCDONTSMail.BodyFormat = 0
MyCDONTSMail.MailFormat = 0
MyCDONTSMail.Body = MyBody
MyCDONTSMail.Send
response.Redirect("/thanks.htm")
SET MyCDONTSMail = NOTHING
Response.Redirect( "/thanks.htm" )
end if%>