<%MyPage = request.ServerVariables("HTTP_REFERER")%> <% if Request.form("MiEmail") <> "" THEN Dim Email ' Create a new instance of the NewMail object Set Email = Server.CreateObject("CDONTS.Newmail") 'Sets the senders email address Email.From = request.form("MiEmail") 'Sets the email address of the recipient Email.To = request.form("EmailAmigo") 'Sets the subject for the email Email.Subject = "Mensaje de " & request.form("MiNombre") & " y La Cocay Restaurante Cozumel" 'Sets the message Email.Body ="Hola " & request.form("NombreAmigo") & ", " & request.form("MiNombre") & " desea enviarte el link de nuestra página en Internet ya que creyó oportuno enviarlo a tu cuenta de correo." & vbcrlf & vbcrlf & "http://www.lacocay.com" & vbcrlf & vbcrlf & "Importante!!! La Cocay Restaurante Respeta su Privacidad. NO Guardamos ningun dato que incluya sus datos personales" & vbcrlf & vbcrlf & "Dudas o comentarios escríbanos a lacocay@gmail.com" & vbcrlf 'Sends the email Email.Send 'Destroy the NewMail object Set Email = Nothing response.Redirect("thankyou.cfm") END IF %> Send this site to a Friend | La Cocay Mediterranean Cuisine Cozumel Mexico

Envia este sitio a un amigo!!

Importat: We respect your privacy, La Cocay Restaurant WILL NOT keep, archive, sell or give to third party companies any of your information, We ONLY use your information to send an email invitation to the person you choose to send this link.

A value is required.
A value is required.
A value is required.
A value is required.

Facebook
Twitter