<%
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 %>
<% End Sub
Sub Paso2
Dim captchas
Set captchas = CaptchasDotNet ("demo","secret","","","abcdefghkmnopqrstuvwxyz","6","240","80")
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")
EMP = request.form ("empresa")
EMP=replace(EMP, "á", "á")
EMP=replace(EMP, "é", "é")
EMP=replace(EMP, "í", "í")
EMP=replace(EMP, "ó", "ó")
EMP=replace(EMP, "ú", "ú")
EMP=replace(EMP, "Á", "Á")
EMP=replace(EMP, "É", "É")
EMP=replace(EMP, "Í", "Í")
EMP=replace(EMP, "Ó", "Ó")
EMP=replace(EMP, "Ú", "Ú")
EMP=replace(EMP, "Ñ", "Ñ")
EMP=replace(EMP, "ñ", "ñ")
EMP=replace(EMP, "º", "º")
EMP=replace(EMP, "ª", "ª")
FCH = date() &" - "& time()
CRS1 = request.form ("curso1")
CRS2 = request.form ("curso2")
CRS3 = request.form ("curso3")
CRS4 = request.form ("curso4")
CRS5 = request.form ("curso5")
CRS6 = request.form ("curso6")
CRS7 = request.form ("curso7")
if CRS1 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C1 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C1 = CRS1
end if
if CRS2 ="vacio" then
C2 = " "
else
if CRS2 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C2 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C2 = CRS2
end if
end if
if CRS3 ="vacio" then
C3 = " "
else
if CRS3 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C3 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C3 = CRS3
end if
end if
if CRS4 ="vacio" then
C4 = " "
else
if CRS4 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C4 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C4 = CRS4
end if
end if
if CRS5 ="vacio" then
C5 = " "
else
if CRS5 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C5 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C5 = CRS5
end if
end if
if CRS6 ="vacio" then
C6 = " "
else
if CRS6 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C6 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C6 = CRS6
end if
end if
if CRS7 ="vacio" then
C7 = " "
else
if CRS7 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
C7 = "MÓDULOS FORMATIVOS DEL CURSO DE ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES
MF1017_2: INTERVENCIÓN EN LA ATENCIÓN HIGIÉNICO-ALIMENTARIA EN INSTITUCIONES
MF1018_2: INTERVENCIÓN EN LA ATENCIÓN SOCIOSANITARIA EN INSTITUCIONES
"
else
C7 = CRS7
end if
end if
CURSOS = "Curso Prioritario:
"& C1 &"
Otros cursos seleccionados:
"& C2 &"
"& C3 &"
"& C4 &"
"& C5 &"
"& C6 &"
"& C7 &""
if CRS1 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE1 ="
Documentación curso prioritario"
else
if CRS1 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE1 ="
Documentación curso prioritario, debe rellenar los 2 documentos con sus datos"
else
if CRS1 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE1 ="
Documentación curso prioritario"
else
if CRS1 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE1 ="
Documentación curso prioritario"
else
if CRS1 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE1 ="
Documentación curso prioritario"
else
if CRS1 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE1 ="
Documentación curso prioritario"
else
if CRS1 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE1 ="
Documentación curso prioritario"
end if
end if
end if
end if
end if
end if
end if
if CRS2 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE2 ="
Documentación curso secundario (2)"
else
if CRS2 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE2 ="
Documentación curso secundario (2), debe rellenar los 2 documentos con sus datos"
else
if CRS2 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE2 ="
Documentación curso secundario (2)"
else
if CRS2 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE2 ="
Documentación curso secundario (2)"
else
if CRS2 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE2 ="
Documentación curso secundario (2)"
else
if CRS2 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE2 ="
Documentación curso secundario (2)"
else
if CRS2 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE2 ="
Documentación curso secundario (2)"
else
ENLACE2 =""
end if
end if
end if
end if
end if
end if
end if
if CRS3 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE3 ="
Documentación curso secundario (3)"
else
if CRS3 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE3 ="
Documentación curso secundario (3), debe rellenar los 2 documentos con sus datos"
else
if CRS3 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE3 ="
Documentación curso secundario (3)"
else
if CRS3 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE3 ="
Documentación curso secundario (3)"
else
if CRS3 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE3 ="
Documentación curso secundario (3)"
else
if CRS3 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE3 ="
Documentación curso secundario (3)"
else
if CRS3 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE3 ="
Documentación curso secundario (3)"
else
ENLACE3 =""
end if
end if
end if
end if
end if
end if
end if
if CRS4 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE4 ="
Documentación curso secundario (4)"
else
if CRS4 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE4 ="
Documentación curso secundario (4), debe rellenar los 2 documentos con sus datos"
else
if CRS4 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE4 ="
Documentación curso secundario (4)"
else
if CRS4 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE4 ="
Documentación curso secundario (4)"
else
if CRS4 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE4 ="
Documentación curso secundario (4)"
else
if CRS4 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE4 ="
Documentación curso secundario (4)"
else
if CRS4 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE4 ="
Documentación curso secundario (4)"
else
ENLACE4 =""
end if
end if
end if
end if
end if
end if
end if
if CRS5 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE5 ="
Documentación curso secundario (4)"
else
if CRS5 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE5 ="
Documentación curso secundario (5), debe rellenar los 2 documentos con sus datos"
else
if CRS5 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE5 ="
Documentación curso secundario (4)"
else
if CRS5 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE5 ="
Documentación curso secundario (4)"
else
if CRS5 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE5 ="
Documentación curso secundario (4)"
else
if CRS5 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE5 ="
Documentación curso secundario (4)"
else
if CRS5 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE5 ="
Documentación curso secundario (4)"
else
ENLACE5 =""
end if
end if
end if
end if
end if
end if
end if
if CRS6 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE6 ="
Documentación curso secundario (6)"
else
if CRS6 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE6 ="
Documentación curso secundario (6), debe rellenar los 2 documentos con sus datos"
else
if CRS6 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE6 ="
Documentación curso secundario (6)"
else
if CRS6 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE6 ="
Documentación curso secundario (6)"
else
if CRS6 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE6 ="
Documentación curso secundario (6)"
else
if CRS6 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE6 ="
Documentación curso secundario (6)"
else
if CRS6 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE6 ="
Documentación curso secundario (6)"
else
ENLACE6 =""
end if
end if
end if
end if
end if
end if
end if
if CRS7 = "ATENCIÓN AL PACIENTE HOSPITALARIO" then
ENLACE7 ="
Documentación curso secundario (7)"
else
if CRS7 = "ATENCIÓN SOCIOSANITARIA A PERSONAS DEPENDIENTES EN INSTITUCIONES SOCIALES" then
ENLACE7 ="
Documentación curso secundario (7), debe rellenar los 2 documentos con sus datos"
else
if CRS7 = "CUIDADOS AUXILIARES DE ENFERMERÍA EN GERIATRÍA" then
ENLACE7 ="
Documentación curso secundario (7)"
else
if CRS7 = "CUIDADOS DE ÚLCERAS POR PRESIÓN" then
ENLACE7 ="
Documentación curso secundario (7)"
else
if CRS7 = "INTEGRACIÓN FUNCIONAL DEL CELADOR EN INSTITUCIONES SANITARIAS" then
ENLACE7 ="
Documentación curso secundario (7)"
else
if CRS7 = "MENÚS PARA DIETAS ESPECIALES" then
ENLACE7 ="
Documentación curso secundario (7)"
else
if CRS7 = "TRASTORNOS LIGADOS A LA MOVILIDAD" then
ENLACE7 ="
Documentación curso secundario (7)"
else
ENLACE6 =""
end if
end if
end if
end if
end if
end if
end if
H1 = ENLACE1
if ENLACE2 ="" then
H2 =""
else
H2 = ENLACE2
end if
if ENLACE3 ="" then
H3 =""
else
H3 = ENLACE3
end if
if ENLACE4 ="" then
H4 =""
else
H4 = ENLACE4
end if
if ENLACE5 ="" then
H5 =""
else
H5 = ENLACE5
end if
if ENLACE6 ="" then
H6 =""
else
H6 = ENLACE6
end if
if ENLACE7 ="" then
H7 =""
else
H7 = ENLACE7
end if
If Not captchas.validate (Request.form("random")) Then %>
ERROR
Cada CAPTCHA sólo puede ser usado una vez.
Pinche aquí e intentelo de nuevo.
<% ElseIf Not captchas.verify (Request.form("password"), Request.form("random")) Then %>
ERROR
Los caracteres introducidos son incorrectos.
Pinche aquí e intentelo de nuevo.
<% Else
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, empresa) values ('"+NMB+"', '"+APL+"', '"+DNI+"', '"+STC+"', '"+DRC+"', '"+CP+"', '"+PBL+"', '"+PRV+"', '"+TF1+"', '"+EML+"', '"+CURSOS+"', '"+FCH+"', '"+EMP+"')"
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 &" | Empresa | "& EMP &" |
|
"
strM3= "
Te has PRE-INSCRITO con los siguientes datos, nos pondremos en contacto contigo si resultas seleccionado.
DATOS DE PRE-INSCRIPCIÓN
"& NMB &" "& APL &" ("& DNI &")
"& STC &"
"& DRC &" / "& CP &" / "& PBL &" / "& PRV &"
"& TF1 &" / "& EML &"
"& EMP &"
"& CURSOS &"
ARCHIVOS NECESARIOS QUE DEBE ENVIARNOS PARA COMPLETAR LA PRE-INSCRIPCIÓN
Descargue el archivo que se muestran a continuación, rellenelo y remitanoslo junto con la documentación abajo indicada según su situación laboral actual:
"& H1 &"
- Para los pre-inscritos como trabajadores/as - autónomos/as:
Informe actualizado de Vida Laboral
Fotocopia de la cabecera de la última nómina
Fotocopia del Contrato de Trabajo
Fotocopia DNI (ámbas caras)
Fotocopia última titulación obtenida (ESO, BUP, Bachillerato, Universidad ...)
- Para los pre-inscritos como desempleados/as:
Informe actualizado de Vida Laboral
Fotocopia de la Tarjeta de Demanda de Empleo
Fotocopia DNI (ámbas caras)
Fotocopia última titulación obtenida (ESO, BUP, Bachillerato, Universidad ...)
REMITANOS ESTOS DOCUMENTOS LO ANTES POSIBLE:
- Mediante email: cursos@sanjorgeformacion.com, con el asunto: Archivos para Pre-Inscripción (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 Curso Sanidad Privada"
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 Sanidad Privada"
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
<%
end if
End Sub %>