Niveles de Usuarios........

[Potro]

Me podrian pasar por favor un ejemplo de niveles de usuarios.-.

Ejemplo que a una base de datos los usuario nivel 1 solo puedean ver siertas página o entrar ok..

y los usuarios nivel 2 puedan acceder a todas las páginas ok..

Espero quu me haya explicado por favor es urgentisimo o si no apeligra mi trabajo se los suplico....

P.D. Si alguien me quisiera hechar la mano pueden escribirme a [email protected]....


ATTE : Joel Mora Lugo... (Potro)

[Juansan]

eso ya lo tenes hecho??, lo de los usuarios en la base de datos con un 1 o con un 2 ??.
Si ya lo tenes hecho, es facil, cuando el usuario se loguea, le creas una session("nivel")=rs("nivel").

Luego, en cada pagina pones:

If session("nivel")<>"2" then
response.write ("no esta autorizado a ver esta pagina")
else

---el resto de la pagina---

end if

No pierdas el trabajo, sigo conectado.

[Potro]

M;uchas gracias juansan pero no te logro aun entender como debo de abriri la sesion nivel...

te pongo el jemplo de como me conecto a la base de datos y me dices donde ponerlo por favor...

<%if request.form("usuario")="" then%>
<form method="POST" action="login.asp">
<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p align="center"><%=request.querystring("msg")%></p>
<div align="center">
<center>
<table border="0" width="50%" bgcolor="#F2F2F2">
<tr>
<td width="100%" colspan="2" bgcolor="#0000FF">
<p align="center"><font color="#FFFFFF">Login</font></td>
</tr>
<tr>
<td width="50%">Usuario:</td>
<td width="50%"><input type="text" name="usuario" size="20"></td>
</tr>
<tr>
<td width="50%">Password: </td>
<td width="50%"> <input type="password" name="password" size="20"></td>
</tr>
<tr>
<td width="100%" colspan="2">
<p align="center"><input type="submit" value="Enviar" name="B1"></td>
</tr>
</table>
</center>
</div>
</form>


<%else
'eliminamos las posibles comillas de la entrada
'para evitar la introducción de sentencias SQL
usuario=replace(request.form("usuario"),"'","")
password=replace(request.form("password"),"'","")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("usu.mdb"))
set rs = CreateObject("ADODB.Recordset")
sqltxt="Select * from usuarios where usuario='"&usuario&"' and password= '"&password&"'"
'response.write sqltxt
rs.Open sqltxt, conn
if not rs.eof then
' nos ha devuelto un registro, ahora miraremos si es valido
' con ello evitamos el ataque típico SQL
if rs("usuario")=usuario and rs("password")=password then
' si el usuario esta en la base de datos y la password coincide
session("nivel_usuario")=rs
response.redirect "default.asp"
end if
else
session("nivel_usuario")=-1

end if
rs.close
set rs=nothing
conn.close
set conn=nothing
if session("autorizacion")=-1 or session("autorizacion")="" then
' no hemos encontrado el registro
' eso indica que el usuario y/o la password son erroneos
response.redirect "login.asp?msg=Usuario%20o%20password%20incorrecta "
end if

end if%>

por favor checa si esta bien gracias...

[Juansan]

esta casi bien, solo te falta esto:

session("nivel_usuario")=rs("camponivel")

'El camponivel es el campo en base de datos donde esta el 1 o el 2 segun el nivel.

Entonces una vez validado, la session("nivel_usuario") valdra 1 o 2 segun el valor que tenga el campo de la base de datos.

Sigo conectado