Senha X Login

[Guest - Roberto -]

Olá, bem gostaria de saber como poderia fazer uma área restrita que fosse nessesário login e senha. Sei que as senhas cadastradas em um site, devem ser armazenadas em um banco de dados. Mas como poderia fazer para impedir que um usuário acessase uma página sem ter o login e senha corretos.

Obrigado

[Victor]

Tipo você faz a session na pagina do login... Ai na pagina que você quer que só possa acessar se tiver logada você usa um IF... Olhe os exemplos:

<!--#include file="conecta.asp"-->
<%if request.form("acao") = "" then%>

<table>
<form action="index.asp" method="post">
<tr>
<td>Login: </td>
<td><input name="login" size="25"></td>
</tr>
<tr>
<td>Senha: </td>
<td><input name="senha" size="25"></td>
</tr>
<tr>
<td colspan="2" align="right"><input type="Hidden" name="acao" value="login"><input type="Submit" name="login"></td>
</tr>
</form>
</table>

<%end if%>

<%
if request.form("acao")="login" then

Set RecSet=Server.CreateObject("adodb.recordset")

RecSet.Open "Select * from usuario where login = '"&Request.Form("login")&"' and senha = '"&Request.form("senha")&"'", conn, 3
if RecSet.EOF then
response.write "<font color=#000000>Login ou senha inválidos <a href=index.asp>clique aqui</a> e tente novamente..."
else
login=RecSet("login")
senha=RecSet("senha")

if Request.Form("login") = login and Request.form("senha") = senha then
session("login") = true
end if
Response.redirect("pagina.asp")

end if
RecSet.Close
end if
%>

Essa foi a parte do login com o banco de dados... Agora na página se você não quiser que uma pessoa possa ver a pagina sem tiver logado se faz assim:

<%if session("login") = true then
response.write "Aqui vai ser todo o conteudo do site"
else
response.write "Você não tem autorização de acessar essa página!!!"
end if
%>

Qualquer dúvida pergunte, que nós te responderemos

Entendeu como funciona???

[]'s

Victor

[rodfraga]

Eu estou fazendo um sistema que anda meio parado.

Eu fazia assim:

O login, ai se o login for correto:

Session("nivel") = tabela("nivel")

Ai esse valor vai ficar por toda execução do sistema, e toda página restrita do sistema verifica o nivel guardado na session, e dependendo do conteudo, só admins acessam. Mas todas as paginas a não ser do login, só se pode acessar logado.

[Victor]

Eu estou fazendo um sistema que anda meio parado.

Eu fazia assim:

O login, ai se o login for correto:

Session("nivel") = tabela("nivel")

Ai esse valor vai ficar por toda execução do sistema, e toda página restrita do sistema verifica o nivel guardado na session, e dependendo do conteudo, só admins acessam. Mas todas as paginas a não ser do login, só se pode acessar logado.

Você pode fazer outra coluna no banco de dados... Uma chamada admin(sim/não), ai você faz um verifica no codigo se ele é true ou false, ai se faz:

se for true então apareceça tudo

mas se for false mostre só o necessário

Entendeu?

[rodfraga]

Acho que foi assm que eu fiz. Não lembro.. ta paradao... alias é melhor eu continuar ele...

[Victor]

Olhe do modo de admin:

<!--#include file="conecta.asp"-->
<%if request.form("acao") = "" then%>

<table>
<form action="index.asp" method="post">
<tr>
<td>Login: </td>
<td><input name="login" size="25"></td>
</tr>
<tr>
<td>Senha: </td>
<td><input name="senha" size="25"></td>
</tr>
<tr>
<td colspan="2" align="right"><input type="Hidden" name="acao" value="login"><input type="Submit" name="login"></td>
</tr>
</form>
</table>

<%end if%>

<%
if request.form("acao")="login" then

Set RecSet=Server.CreateObject("adodb.recordset")

RecSet.Open "Select * from usuario where login = '"&Request.Form("login")&"' and senha = '"&Request.form("senha")&"'", conn, 3
if RecSet.EOF then
response.write "<font color=#000000>Login ou senha inválidos <a href=index.asp>clique aqui</a> e tente novamente..."
else
login=RecSet("login")
senha=RecSet("senha")

if Request.Form("login") = login and Request.form("senha") = senha then
session("login") = true
session("admin") = RecSet("admin")
end if
Response.redirect("pagina.asp")

end if
RecSet.Close
end if
%>

<%if session("login") = true or session("admin") = true then
response.write "Aqui vai ser todo o conteudo do site"
else
response.write "Você não tem autorização de acessar essa página!!!"
end if
%>

Ai vocÊ faz do jeito que achar melhor!!!

[]'s

Victor