Community LifeCare Inc.

<% if Request.QueryString("action") = "submit" then aReferers = Array("developer2","www.communitylifecare.ca","communitylifecare.ca") currentReferer = Request.ServerVariables("HTTP_REFERER") ' validateReferer(Request.ServerVariables("HTTP_REFERER",validReferers) ' Function to validate the referring page function validateReferer(sReferer) validReferer = false for each host in aReferers if (("http://" & host & "/") = Left(sReferer,(8+Len(host)))) then validReferer = true end if next if not validReferer then Response.redirect("contact_pass.asp") end if end function call validateReferer(currentReferer) sName = Replace(Request.form("name"),"'","`") sAddress = Replace(Request.form("address"),"'","`") sCity = Replace(Request.form("city"),"'","`") sProvince = Replace(Request.form("province"),"'","`") sCode = Replace(Request.form("postal"),"'","`") sPhone1 = Replace(Request.form("phone_number"),"'","`") sEmail = Replace(Request.form("SenderEmail"),"'","`") sReason = Replace(Request.form("reason"),"'","`") sComments = Replace(Request.form("comments"),"'","`") sBody = "Name: " & sName & vbnewline sBody = sBody & "Address: " & sAddress & vbnewline sBody = sBody & "City: " & sCity & vbnewline sBody = sBody & "Province: " & sProvince & vbnewline sBody = sBody & "Postal Code: " & sCode & vbnewline sBody = sBody & "Phone Number: " & sPhone1 & vbnewline sBody = sBody & "Email Address: " & sEmail & vbnewline sBody = sBody & "Reason for Contact: " & sReason & vbnewline sBody = sBody & "Comments:" & sComments & vbnewline Dim SendMail Set SendMail = Server.CreateObject("CDONTS.NewMail") 'FORMAT WHERE IT IS GOING AND WHAT IT WILL SAY SendMail.From = "mail@communitylifecare.ca" SendMail.Subject = "Community Lifecare Contact Form Results" SendMail.To = "mail@communitylifecare.ca" SendMail.bcc = "info@digcanada.com" SendMail.Body = sBody if instr(1,sBody,"Content-Type:") or instr(1,sBody,"MIME") or instr(1,sBody,"href") then Response.redirect("contact_pass.asp") else SendMail.Send end if 'CLEAN and CLEAR THE COMPONENT Set SendMail = Nothing Response.redirect("contact_pass.asp") end if%> Community LifeCare Inc.

Community Lifecare Inc.


Name:	*
Address:
City:
Province:
Postal Code:
Phone Number:	*
E-mail Address:	*
Reason for contact:

Please enter any questions or comments:


Please note: Community Lifecare will not use or sell your email address or disclose your personal information to third parties without your consent. Click here to review our entire Privacy Policy.

	*required fields

By Mail:
Community Lifecare Inc.
1955 Valley Farm Rd., 3rd floor
Pickering, ON L1V 1X6

By Phone:
905-831-1801

By Fax:
905-831-1802

Employment Opportunities:

HR@clmi.ca
Please quote preferred location in the subject line.
NO PHONE CALLS, FAXES OR AGENCIES PLEASE

Legal Information | Privacy Policy