Shopping Hospedagem Fórum Contato
     
   O portal do desenvolvedor ASP Florianópolis-SC, Quinta-feira - 21 de Setembro de 2017  
Busca

Menu do site
Efetuar Login
Usuário:

Senha:

 Esqueceu a senha?
Login automático

 Cadastre-se
Login e Senha
Avaliações: 36   -   Minha nota: Média Geral: 3  

Login e Senha

A pedido de algumas pessoas estou aqui publicando um artigo de como aplicar um sistema de login e senha em seu site.
Você precisará de um Banco de Dados com os seguintes campos: login e senha

Agora basta acompanhar o passo-a-passo:

(login.html):

<html><body>
<form action="login.asp">
<h3>Login:</h3><input type="text" name="login"><br>
<h3>Senha:</h3><input type="password" name="senha"><br>
<input type="submit" value="Entrar">
</form></body></html>

(login.asp):

<%@Language=VBScript%>
<%response.buffer="true"%>
<%
'Recupero o texto que foi escrito no formulário
vlogin=request.form("login")
vsenha=request.form("senha")
'Façoa conexão com o banco de dados
db=Server.MapPath("pasta/qualquer/bancodedados.mdb")
Set con = Server.CreateObject( "adodb.Connection" ) con.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & db & ";"
set rs=con.execute("select*from tabela_do_banco where login='"&vlogin&"' and senha='"&vsenha&"'")
'Se não for encontrado nenhum registro aparecerá uma mensagem de erro.Caso contrário o visitanmte receberá um nome de sessão para poder navegar nas demais paginas protegidas e será redirecionado para a página protegida
if rs.EOF then
response.write"Senha ou Login inválido!Volte e tente novamente."
else
session("logado")="sim"
response.redirect"pagina_protegida.asp"
end if
%>

Obs: Todas as páginas protegidas deverão conter o seguinte código(antes de qualquer outro):

<%
if session("logado")="" then
response.redirect"login.html"
end if
%>

Obs2:Para fazer com que uma sessão do visitante termine basta criar um link em qualquer página e direcioná-lo para uma página que contenha o seguinte código:

<%
session.abandon
response.write"Você saiu da área restrita com sucesso!"
%>





SuperASP do Brasil Ltda

03.066.522/0001-84
Av. Rio Branco 433 - Centro - Florianopolis - SC
Contato

© 2001/2008 - Superasp do Brasil Ltda. Todos os direitos reservados