Ver Mensaje Individual
  #5 (permalink)  
Antiguo 15/05/2005, 15:26
mariano_donati
 
Fecha de Ingreso: marzo-2005
Mensajes: 1.418
Antigüedad: 20 años
Puntos: 9
Hola leaizza, aca te paso la función de log_in que uso yo comunmente, pero dejame aclararte, antes que te des cuenta vos mismo, que es algo muy básico, que lo único que hace es comprobar con la base de datos si el usuario y la clave que introdujo son correctos.
A la función le pasas tres parametros, primero el Nick que introduce el usuario segundo la clave y el tercero es la URL que quieres que te redireccione luego de comprobar que los datos son correctos. Otra cosa que hace es si el usuario se logueo con exito, es establecer el valor de session("log") a true, entonces luego en cada pagina antes de mostrar cualquier contenido hago una simple condicion de que si session("log") es false, entonces lo redirecciono para el logueo, sino le muestro el contenido.
Cualquier cosa me avisas y saludos. Espero que alguien complemente esto que te mande porque seguro te quedas corto con esto solo en el tema del logueo de usuarios.
SAludos.


function Log_In(Nick, Pass, URL_Redirect)

Dim RS
set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "SELECT Nick, Clave FROM UsuReg WHERE Nick = '"&Nick&"' AND Clave = '"&Pass&"'", session("conn")

valid = true

if RS.EOF then
valid = false
else
session("log") = true
valid = true
Response.Redirect(URL_Redirect)
end if

Log_In = valid

end function