%
dim Msg
Msg=""
if request.form("enviado")="true" then
dim rs, rsx, rsr, rsa
consultartabla rs,"USUARIO,COD_PERFIL,COD_EVENTO","TBWB_USUARIOS","USUARIO='"& request.form("txUser") &"' AND CLAVE = '"& request.form("txClave") &"' AND FEC_VIG > CAST("& DATE() &" AS DATETIME)","","",""
if not rs.eof then
session("Perfil")=rs.fields.item("COD_PERFIL").value
session("Evento")=rs.fields.item("COD_EVENTO").value
consultartabla rsx,"DESC_PERFIL,RUTA_PERFIL","TBWB_PERFILES","COD_PERFIL=" & SESSION("Perfil"),"","",""
consultartabla rsr,"RUTA_FORMULARIO","TBWB_RUTAS","COD_EVENTO=" & session("Evento"),"","",""
consultartabla rsa,"RUTA_ADMIN", "TBWB_RUTAS_ADMIN", "COD_EVENTO = " & session("Evento") & " AND COD_PERFIL = " & session("Perfil"),"","",""
if not rsr.eof then
session("RutaFRM")=rsr.fields.item("RUTA_FORMULARIO")
end if
if not rsx.eof and session("RutaFRM")<> "" then
'escribir rsx.fields.item("RUTA_PERFIL"),"01.txt"
' ya rsa.fields.item("RUTA_ADMIN")
session("DescPerfil")=rsx.fields.item("DESC_PERFIL")
response.Redirect(rsa.fields.item("RUTA_ADMIN"))
else
Msg="Problemas con el servidor, por favor contactese con el administrador de la página"
end if
else
Msg="Usuario o clave incorrectas, por favor intente de nuevo"
end if
end if%>
<%
if request.Form("Formulario") <> "true" then
if request.form("Buscar")="true" and request.form("txtBusqueda") <>"" then
session("Frase") = request.form("txtBusqueda")
response.Redirect("Resultados_Busqueda.asp")
end if
end if
%>
.: Módulo de Terminales de Autoconsulta - Sistema Celta - Goldentech Ltda.
|
|
|
|
| |
<< Ver anterior módulo: Seguros CELTA ® |
|
|
| |
|
| MODULO TERMINALES DE AUTOCONSULTA CELTA® |
|
| |
|
Este módulo permite a los visitantes de la sede explorar las instalaciones directamente desde la pantalla de un computador ubicado estratégicamente para este fin, bien sea con pantalla Touch Screen como dispositivo señalador o con el ratón tradicional.
El módulo presenta un plano de la sede en el cual se ubican las dependencias (en caso de sedes administrativas o culturales) o las diferentes áreas de recreación y atracciones (en caso de sedes vacacionales)
Este módulo se instala en cada una de las sedes de la entidad o en los sitios que sea requerido y permite a los visitantes de la sede contar con una valiosa herramienta que los orienta por las instalaciones.
Adicionalmente, en las sedes vacacionales es posible para el huésped imprimir en el momento que lo requiera su estado de cuenta, que le permiten conocer con antelación al Check Out los cargos efectuados. |
|
| |
|
| |
<< Ver anterior módulo: Seguros CELTA ® |
|
|
|
|
| |
|
|
|
|
|
|
Ultima actualización: <%response.write(date)%> |
|
|
|
| |
|
|
|
|
|
|
|
|
|