Contact Us
 
Write your comments here

 
 
Name:
Company/Firm:
Phone/Fax:
Address:
E-mail:

 
 
<% If request("submit")="Enviar" Then 'Crea objecto de correo Dim correo Set correo = Server.CreateObject("CDONTS.NewMail") correo.To = "abrito@britolaw.com" correo.From = Request("email") correo.Importance = 2 correo.BodyFormat = 0 correo.MailFormat = 0 correo.subject = "Formulario Brito & Pinto" correo.body = "" + "Name: " + Request("nombre") + "
" &_ + "Company/Firm: " + Request("organizacion") + "
" &_ + "Phone/Fax: " + Request("telefono") + "
" &_ + "Address " + Request("direccion") + "
" &_ + "E-mail: " + Request("email") + "
" &_ + "Descripción:" + "
" + Request("descripcion") &_ + "" correo.Send 'Libera Memoria Set correo = nothing End if %>