<% Dim Modo Modo=Ucase(Request.Querystring ("Mod")) Select Case Modo Case "P1" Call Paso1() Case "P2" Call Paso2() Case Else Call Paso1() End Select Sub Paso1 %>
Utilice este formulario para contactar con nosotros
También nos puedes escribir a: info@anccp.es o por Teléfono: 984084239 – 984392675

Le contestaremos lo antes posible.
 
Su nombre (requerido)
Su email (requerido)
Asunto
Su mensaje
 
<% Dim captchas Set captchas = CaptchasDotNet ("demo","secret","","","abcdefghkmnopqrstuvwxyz","6","240","80") %>
<%= captchas.image () %>
 
 
Aviso Legal
De acuerdo con lo establecido en la Ley Orgánica 15/1999, queda informado de la incorporación de sus datos a los ficheros de ASOCIACIÓN NACIONAL DE CENTROS DE FORMACIÓN CON CERTIFICADO DE PROFESIONALIDAD Asimismo, queda informado del tratamiento automatizado a que van a ser sometidos los datos a los que ASOCIACIÓN NACIONAL DE CENTROS DE FORMACIÓN CON CERTIFICADO DE PROFESIONALIDAD tenga acceso como consecuencia de la gestión para su uso interno, oferta, realización de operaciones y contratación de los servicios de la entidad, así como para la gestión administrativa, económica y contable derivada de la prestación de sus servicios, para lo cual da su autorización.

Queda, igualmente informado sobre la posibilidad de ejercer los derechos de acceso, rectificación, cancelación y oposición, en los términos establecidos en la legislación vigente. El responsable del fichero es ASOCIACIÓN NACIONAL DE CENTROS DE FORMACIÓN CON CERTIFICADO DE PROFESIONALIDAD,donde podrá dirigirse en persona o por escrito en el caso de que lo encontrara necesario.

En este sentido, presta por tanto su conformidad a la recogida de datos, así como a la comunicación para las indicadas finalidades que pueda ser realizada entre la Entidad y otras entidades relacionadas con la prestación de servicios de ASOCIACIÓN NACIONAL DE CENTROS DE FORMACIÓN CON CERTIFICADO DE PROFESIONALIDAD o auxiliares de éstas en los términos previstos en la indicada Ley.
<% End Sub Sub Paso2 nombre = request.form ("nombre") email = request.form ("email") asunto = request.form ("asunto") mensaje = request.form ("mensaje") Dim captchas Set captchas = CaptchasDotNet ("demo","secret","","","abcdefghkmnopqrstuvwxyz","6","240","80") if nombre="" then %> <%else if email="" then %> <%else If Not captchas.validate (Request.form("random")) Then %>

ERROR

Cada CAPTCHA sólo puede ser usado una vez.

 

Pinche aquí e intentelo de nuevo.

<% Else If Not captchas.verify (Request.form("password"), Request.form("random")) Then %>

ERROR

Los caracteres introducidos son incorrectos.

 

Pinche aquí e intentelo de nuevo.

 

<% Else emailmontado="  Un usuario de la web ha rellenado sus datos en el formulario de CONTACTO.

Nombre: " & nombre & "
E-mail: " & email & "
Asunto: " & asunto & "

Mensaje:
" & mensaje & "

" Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.anccp.es" Pmail.From = "info@anccp.es" Pmail.FromName = "ANCCP" Pmail.AddAddress "info@anccp.es" Pmail.Subject = "Contacto desde ANCCP.ES" Pmail.Body = "
" & emailmontado & "
" Pmail.IsHTML = True Pmail.Username = "info@anccp.es" Pmail.Password = "Anccp256655" Pmail.Send %>
  Formulario de Contacto  
  El mensaje ha sido correctamente enviado.

Nos pondremos en contacto contigo a través de la forma de contacto que nos has facilitado.
 
<% end if end if end if end if End Sub %>