3 replies to this topic

[Morphman]

Um BD "login.mbd" com os campos id, login, senha, pasta
Ao efetuar o login, a pagina "valida.asp" verifica a combinação login/senha correta e redireciona para a pasta correspondente...

Como eu coloco isso ??

Isso é o que eu ja tenho:

<%
Dim login, senha
login = request.Form("login")
senha = request.Form("senha")

set conn = server.CreateObject("ADODB.Connection")
conn.open " provider=microsoft.jet.oledb.4.0; data source=" & server.MapPath("login.mdb") & ";"

Dim sql
sql = "Select * from vip where login='"&login&"' and senha='"&senha&"'"

Dim rs, usuario_logado
set rs = conn.execute(sql)
if rs.eof then
usuario_logado = false
else
usuario_logado = true  
end if

if usuario_logado = true then
session("usuario_logado") = true
response.Redirect("default.asp")
else
response.Redirect("erro.asp")
end if
%>

- Aki, o usuario é redirecionado a uma pagina Default.asp -

O que eu quero é +- isso :

Login: a Senha: b Pasta: restrito/001/default.asp
Login: c Senha: d Pasta : restrito/002/default.asp


Se puderem me ajudar...
Valew !

[Info_Tec]

No lugar de:

response.Redirect("default.asp")

Use:

response.Redirect(RS("Pasta"))

[.:Matrix:.]

O que você pode fazer tmb eh colocar mais um campo no seu banco de dados tipo

login
Senha
nivel

Depois é soh vc verificar o nivel do usuario

vNivel = RS("Nivel")

Depois eh soh comparar

If vNivel = 1 Then

Response.Redirect("PAGINA1.ASP")

ELSE

Response.Redirect("Pagina2.asp")

End If

Claro que voce ainda pode usar um case para o caso de ter diversas opções.

Espero ter ajudado.

Att,

[Morphman]

vlw !!