<% Dim Modo Modo=Ucase(Request.Querystring ("Mod")) Select Case Modo Case "P" Call Paso1() Case "P2" Call Paso2() Case Else Call Paso1() End Select Sub Paso1 %>
FORMULARIO DE PRE-INSCRIPCIÓN
PLAN DE INTERNACIONALIZACIÓN DE EMPRESAS
Los campos con (*) son obligatorios.

   

 

   



He leido y acepto la cláusula LOPD abajo indicada.


Responsable: Identidad: Centro de Estudios de Seguridad de Asturias S.L. - NIF: B-33485202
Dir. postal: C/ Policarpo Herrero s/n - Espacio Corner - Edificio Calatrava - 33006 - Oviedo (España) Teléfono: 616 049 340 / 985 245 161
Correo electrónico: formacion@cesaseguridad.com
En nombre de la empresa tratamos la información que nos facilita con el fin de enviarle publicidad relacionada con nuestros productos y servicios por cualquier medio (postal, email o teléfono) e invitarle a eventos organizados por la empresa. Los datos proporcionados se conservarán mientras no solicite el cese de la actividad. Los datos no se cederán a terceros salvo en los casos en que exista una obligación legal. Usted tiene derecho a obtener confirmación sobre si en Centro de Estudios de Seguridad de Asturias S.L. estamos tratando sus datos personales por tanto tiene derecho a acceder a sus datos personales, rectificar los datos inexacto o solicitar su supresión cuando los datos ya no sean necesarios para los fines que fueron recogidos. Si en el futuro desea eliminar sus datos, puede enviarnos un email desde la misma cuenta de inscripción a: borrar@sanjorgeformacion.com

VOLVER A LA INFORMACIÓN DE LOS CURSOS


<% End Sub Sub Paso2 NMB = request.form ("nombre") NMB=replace(NMB, "á", "á") NMB=replace(NMB, "é", "é") NMB=replace(NMB, "í", "í") NMB=replace(NMB, "ó", "ó") NMB=replace(NMB, "ú", "ú") NMB=replace(NMB, "Á", "Á") NMB=replace(NMB, "É", "É") NMB=replace(NMB, "Í", "Í") NMB=replace(NMB, "Ó", "Ó") NMB=replace(NMB, "Ú", "Ú") NMB=replace(NMB, "Ñ", "Ñ") NMB=replace(NMB, "ñ", "ñ") NMB=replace(NMB, "º", "º") NMB=replace(NMB, "ª", "ª") APL = request.form ("apellidos") APL=replace(APL, "á", "á") APL=replace(APL, "é", "é") APL=replace(APL, "í", "í") APL=replace(APL, "ó", "ó") APL=replace(APL, "ú", "ú") APL=replace(APL, "Á", "Á") APL=replace(APL, "É", "É") APL=replace(APL, "Í", "Í") APL=replace(APL, "Ó", "Ó") APL=replace(APL, "Ú", "Ú") APL=replace(APL, "Ñ", "Ñ") APL=replace(APL, "ñ", "ñ") APL=replace(APL, "º", "º") APL=replace(APL, "ª", "ª") DNI = request.form ("dni") STC = request.form ("situacion") DRC = request.form ("direccion") DRC=replace(DRC, "á", "á") DRC=replace(DRC, "é", "é") DRC=replace(DRC, "í", "í") DRC=replace(DRC, "ó", "ó") DRC=replace(DRC, "ú", "ú") DRC=replace(DRC, "Á", "Á") DRC=replace(DRC, "É", "É") DRC=replace(DRC, "Í", "Í") DRC=replace(DRC, "Ó", "Ó") DRC=replace(DRC, "Ú", "Ú") DRC=replace(DRC, "Ñ", "Ñ") DRC=replace(DRC, "ñ", "ñ") DRC=replace(DRC, "º", "º") DRC=replace(DRC, "ª", "ª") CP = request.form ("cp") PBL = request.form ("poblacion") PRV = request.form ("provincia") TF1 = request.form ("telefono") EML = request.form ("email") CHK = request.form ("clausula") FCH = date() &" - "& time() if STC ="Trabajador/a en Activo" then ARCHIVOS ="
- Para los pre-inscritos como trabajadores/as por cuenta ajena
Fotocopia DNI
(ámbas caras)
" else if STC ="Autónomo/a" then ARCHIVOS ="
- Para los pre-inscritos como trabajadores/as autónomos/as
Fotocopia del último recibo
bancario del pago de autónomos
Fotocopia DNI
(ámbas caras)
" else ARCHIVOS ="
- Para los pre-inscritos como desempleados/as
Fotocopia de tarjeta de demanda de empleo Fotocopia DNI
(ámbas caras)
" end if end if CURSOS = "PLAN DE INTERNACIONALIZACION DE NEGOCIOS" Set cn = Server.CreateObject("ADODB.Connection") cn.Open "DSN=181.datoscsepe" Set rs = cn.execute ("SELECT * FROM preinscritos") cad="Insert into preinscritos (Nombre, Apellidos, DNI, Situacion, Direccion, CP, Poblacion, Provincia, Telefono1, Email, Curso, Fecha) values ('"+NMB+"', '"+APL+"', '"+DNI+"', '"+STC+"', '"+DRC+"', '"+CP+"', '"+PBL+"', '"+PRV+"', '"+TF1+"', '"+EML+"', '"+CURSOS+"', '"+FCH+"')" set rs=cn.execute(cad) strM1= "

Un/a usuario/a de la web se ha pre-inscrito con los siguientes datos:
Datos de Pre-inscripción
Curso"& CURSOS &"
Nombre"& NMB &" "& APL &"
DNI"& DNI &"
Situación"& STC &"
Dirección"& DRC &"
 "& CP &" / "& PBL &" / "& PRV &"
Teléfono"& TF1 &"
Email"& EML &"
" strM3= "



Te has PRE-INSCRITO con los siguientes datos, nos pondremos en contacto contigo si resultas seleccionado.


DATOS DE PRE-INSCRIPCIóN
"& CURSOS &"

"& NMB &" "& APL &" ("& DNI &")

"& STC &"

"& DRC &" / "& CP &" / "& PBL &" / "& PRV &"

"& TF1 &" / "& EML &"


ARCHIVOS NECESARIOS QUE DEBE ENVIARNOS PARA COMPLETAR LA PRE-INSCRIPCIÓN
Descargue el archivos que se muestran a continuación, rellenelo y remitanoslo junto con la documentación abajo indicada según su situación laboral actual:


(ficha de inscripción)


Además de el formulario arriba indicado, nesitamos que nos remita lo antes posible la siguiente documentación:

"& ARCHIVOS &"

Remitanos estos documentos a través de:

- Mediante email: formacion@cesaseguridad.com, con el asunto: Archivos para Pre-Inscripción: Curso Aditivos Alimentarios - Cursos de Navarra (indicando su nombre y apellidos).

- Si no tiene la opción de poder escanear los documentos requeridos para enviarlos, existen aplicaciones para dispositivos móviles (móviles y tablets con sistema android, iphone, windows, ...) para escanear archivos como TinyScan, por ejemplo. Como último recurso, puede realizar fotos de la documentación requerida, lo suficientemente visible y enviarnoslas por email (cursos@sanjorgeformacion.com) o a través de whatsapp (684 645 700) de San Jorge Formación.
" mail2 = "cursos@sanjorgeformacion.com" mail4 = "formacion@cesaseguridad.com" mail5 = "a.arnaldo@cesaseguridad.com" mail3 = EML Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.serviciodecorreo.es" Pmail.From = "cursos@sanjorgeformacion.com" Pmail.FromName = "Cesa Seguridad" Pmail.AddCC mail2 Pmail.Subject = "PreInscripcion Curso: PLAN INTERNACIONALIZACION DE NEGOCIOS" Pmail.Body = "" & strM1 & "" Pmail.IsHTML = True Pmail.SSL = True Pmail.Port = 465 Pmail.Username = "cursos@sanjorgeformacion.com" Pmail.Password = "Fo256655" Pmail.Send Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.serviciodecorreo.es" Pmail.From = "cursos@sanjorgeformacion.com" Pmail.FromName = "Cesa Seguridad" Pmail.AddCC mail3 Pmail.Subject = "Tus datos de PRE-Inscripcion Curso: PLAN INTERNACIONALIZACION DE NEGOCIOS" Pmail.Body = "" & strM3 & "" Pmail.IsHTML = True Pmail.SSL = True Pmail.Port = 465 Pmail.Username = "cursos@sanjorgeformacion.com" Pmail.Password = "Fo256655" Pmail.Send Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.serviciodecorreo.es" Pmail.From = "cursos@sanjorgeformacion.com" Pmail.FromName = "Cesa Seguridad" Pmail.AddCC mail4 Pmail.Subject = "PreInscripcion Curso: PLAN INTERNACIONALIZACION DE NEGOCIOS" Pmail.Body = "" & strM1 & "" Pmail.IsHTML = True Pmail.SSL = True Pmail.Port = 465 Pmail.Username = "cursos@sanjorgeformacion.com" Pmail.Password = "Fo256655" Pmail.Send Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.serviciodecorreo.es" Pmail.From = "cursos@sanjorgeformacion.com" Pmail.FromName = "Cesa Seguridad" Pmail.AddCC mail5 Pmail.Subject = "PreInscripcion Curso: PLAN INTERNACIONALIZACION DE NEGOCIOS" Pmail.Body = "" & strM1 & "" Pmail.IsHTML = True Pmail.SSL = True Pmail.Port = 465 Pmail.Username = "cursos@sanjorgeformacion.com" Pmail.Password = "Fo256655" Pmail.Send %>
FORMULARIO DE PRE-INSCRIPCIÓN

Sus datos han sido enviados correctamente


VOLVER A LA INFORMACIÓN DE LOS CURSOS
VOLVER AL FORMULARIO DE PRE-INSCRIPCIÓN


<% End Sub %>