<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> [an error occurred while processing this directive] <% If (Request.Form("submit") <> "") Then Dim rsSelectUser Set rsSelectUser = Server.CreateObject("ADODB.Recordset") rsSelectUser.ActiveConnection = MM_cnnGSETEL_STRING rsSelectUser.Source = "SELECT idusuario, login, password, dUsuarios.idtipousuario, tipousuario FROM dUsuarios Inner Join nTipoUsuarios ON dUsuarios.idtipousuario = nTipoUsuarios.idtipousuario WHERE login='" & Replace(Request.Form("login"),"'","''") &"' AND password='" & Replace(Request.Form("password"),"'","''") & "';" rsSelectUser.CursorType = 0 rsSelectUser.CursorLocation = 2 rsSelectUser.LockType = 1 rsSelectUser.Open() If ((Not rsSelectUser.EOF) OR (Not rsSelectUser.EOF)) Then Session("MM_Username") = MM_valUsername Session("login") = rsSelectUser("login") Session("idusuario") = rsSelectUser("idusuario") Session("idtipousuario") = rsSelectUser("idtipousuario") Session("tipousuario") = rsSelectUser("tipousuario") If (Session("tipousuario") = "Cliente") Then Response.Redirect("clientpage.asp") Else Response.Redirect("options.asp") End If Else Response.Redirect("login.asp?issue=notfound") End If rsSelectUser.Close() Set rsSelectUser = Nothing End If %> GSETEL- Grupo de Servicios Telemáticos
<%if (Session("login")="") then %> Registrése
Identifíquese
<%else%> Opciones de usuario
Terminar sesión <%end if%>
Ir a InicioDesarrolloServiciosEquipamientoCapacitación  
 
<% End If %>

Introduzca el "Usuario" y "Contraseña" que utilizó cuando se registró como usuario.
Si ha olvidado su "Password" o tiene problemas para entrar visite la página Recuperar Password. Si aún no se ha registrado como usuario en nuestro sitio lo invitamos a que se registre y vea las ventajas que le ofrecemos. Registrarse como usuario

Usuario:
Password:



<% If (Request.QueryString("issue") = "notfound") Then %>
Usted no ha sido reconocido, por favor inténtelo nuevamente.

 
    Copyright © 2004. Todos los derechos reservados. Gsetel