Restringir acceso a usuarios que no són administradores

[Potro]

lo que yo hago es poner un campo mas del nivel_usuario.

lo que podrias hacer es esto.

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("base.mdb"))
set rs = CreateObject("ADODB.Recordset")
sqltxt="Select * from members where usuario='"&usuario&"' and clave= '"&clave&"'"
'response.write sqltxt
rs.Open sqltxt, conn
if not rs.eof then

if rs("usuario")=usuario and rs("clave")=clave then

session("nivel")=rs("nivel_usuario")
response.redirect "intro.asp"
end if
else
session("nivel")=-1

end if
rs.close
set rs=nothing
conn.close
set conn=nothing
if session("nivel")=-1 or session("nivel")="" then

response.redirect "default.asp?msg=usuario%20o%20clave%20incorre cta"
end if

end if%>