Restringir el Acceso a Páginas

Estimado Experto.
Primero Muchas Gracias por tu tiempo.
Resulta que necesito hacer una página de Inicio en donde validar el Usuario, la Password y el Nivel (1,2,3)
Hasta el momento solo estoy validando el usuario y la clave pero no he podido hacer que si el nivel es 1 envíe al usuario a la página 1 y si el nivel es 2 lo envíe a la página 2, Te adjunto una parte de mi código que estoy Utilizando:
<%
Dim usuario, password, oConn, RS
If Request.Form("usuario") = " " OR Request.Form("password") = " " then
'Response.Redirect "pagina1.asp"
Response.Write "Debe Ingresar los Datos del Usuario"
Else
usuario = Trim(Request.Form("usuario"))
password = Trim(Request.Form("password"))
usuario = Replace(usuario,"'","''")
password = Replace(password,"'","''")
'Conectamos a nuestra BD.
Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("./basedatos.mdb")
sql = "SELECT * FROM prueba WHERE usuario = '"& usuario &"'"
Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.Open sql, oConn
If (RS.EOF = true) then
Response.Write "Ese usuario no existe"
ElseIf RS.Fields("password") = password then
%>
<script>
document.location.href = "Produ.asp";
</script>
<%
'Response.Write "Te logueaste con exito... Bienvenido <B>"& usuario &"</B>"
Else
Response.Write "Esa contraseña no concuerda con el usuario ingresado"
End If
RS.Close
oConn.Close
Set RS = Nothing
Set oConn = Nothing
End If
%>