<% name = Trim(Request.Form("name")) email = Trim(Request.Form("email")) query = Trim(Request.Form("query")) query = Replace(query, Chr(13), "
") property = Trim(Request.Form("property")) BodyText = "" BodyText = BodyText + "" BodyText = BodyText + "Property: " + property + "
" BodyText = BodyText + "Name: " + name + "
" BodyText = BodyText + "Email: " + email + "
" BodyText = BodyText + "Query: " + "
" BodyText = BodyText + query BodyText = BodyText + "
" 'using iASP_Mail Component 'http://www.stryon.com/iasp_mail.asp Set mail = Server.CreateObject("SMTPsvg.Mailer") mail.ContentType = "text/html" mail.FromName = "Cyprus-Properties.com" mail.FromAddress= "info@cyprus-properties.com" mail.RemoteHost = "mail.cyprus-properties.com" mail.AddRecipient "Izzet", "izzet@cyprus-properties.com" 'mail.AddRecipient "Alena", "info@cyprus-properties.com" 'mail.AddRecipient "Osman", "osman@cyprus-properties.com" mail.Subject = "Query: " & property mail.BodyText = BodyText if not(mail.SendMail) then response.redirect("/") end if %>

Thank you for your enquiry, it is receiving our attention.

We will contact you shortly.

North Cyprus Properties Page