<% 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
NOVEDADES EN LA SEGURIDAD DE LOS DATOS PERSONALES
Los campos con (*) son obligatorios.

   

 

 





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


Responsable: Identidad: SAN JORGE FORMACIÓN SL - NIF: B74041260
Dir. postal: C/ FUMAXIL, 4, BAJO, 33008 OVIEDO Teléfono: 985236366
Correo electrónico: info@sanjorgeformacion.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 SAN JORGE FORMACI&Ocute;N SL 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 DEL CURSO


<% 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") 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, "ª", "ª") NVL = request.form ("nivel") NVL=replace(NVL, "á", "á") STC = request.form ("situacion") CP = request.form ("cp") PBL = request.form ("poblacion") PRV = "Principado de Asturias" TF1 = request.form ("telefono") EML = request.form ("email") CHK = request.form ("clausula") FCH = date() &" - "& time() if NMB="" or APL="" then %> <% else if DNI="" then %> <% else if DRC="" or CP="" or PBL="" then %> <% else if TF1="" then %> <% else if EML="" then %> <% else if NVL="" then %> <% else if CHK="" then %> <% else ARCHIVOS ="
- Para los pre-inscritos como trabajadores/as autónomos/as
Informe actualizado
de Vida Laboral		Fotocopia del último recibo
bancario del pago de autónomos		 Fotocopia DNI
(ámbas caras)		Fotocopia última titulación obtenida
(ESO, BUP, Bachillerato, Universidad ...)
" CURSOS = "NOVEDADES EN LA SEGURIDAD DE LOS DATOS PERSONALES" 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, Nivel, Direccion, CP, Poblacion, Provincia, Telefono1, Email, Curso, Fecha) values ('"+NMB+"', '"+APL+"', '"+DNI+"', '"+STC+"', '"+NVL+"', '"+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 &"
Nivel"& NVL &"
" 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 &"

"& NVL &"


ARCHIVOS NECESARIOS QUE DEBE ENVIARNOS PARA COMPLETAR LA PRE-INSCRIPCIÓN
Nesitamos que nos remita lo antes posible la siguiente documentación:

"& ARCHIVOS &"

Remitanos estos documentos a través de:

- Mediante email: cursos@sanjorgeformacion.com, con el asunto: Archivos para Pre-Inscripción: Curso Novedades en la Seguridad de los Datos Personales (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" mail3 = EML Set Pmail = Server.CreateObject("Persits.MailSender") Pmail.Host = "smtp.serviciodecorreo.es" Pmail.From = "cursos@sanjorgeformacion.com" Pmail.FromName = "San Jorge Formacion" Pmail.AddCC mail2 Pmail.Subject = "PreInscripcion NOVEDADES EN LA SEGURIDAD DE LOS DATOS PERSONALES" 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 = "San Jorge Formacion" Pmail.AddCC mail3 Pmail.Subject = "Tus datos de PRE-Inscripcion Curso NOVEDADES EN LA SEGURIDAD DE LOS DATOS PERSONALES" Pmail.Body = "" & strM3 & "" 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 DEL CURSO
VOLVER AL FORMULARIO DE PRE-INSCRIPCIÓN


<% End if End if End if End if End if End if End if End Sub %>