Super_Zica_Man Postado Fevereiro 1, 2006 Denunciar Share Postado Fevereiro 1, 2006 Estou postando meu sistema de login.cria um arquivo frame_login.asp<%response.cookies("LOGIN")("valor1")= request.form("T1")response.cookies("LOGIN").expires= (date)+1 %><%response.buffer=true %><html><head><title>Entre com Usuário e Senha - Área de Login</title></head><body background="\Imagens\fundo.jpg" bgproperties="fixed"> <table align="center" width="100%" height="100%"><tr><td valign="middle" align="center"><% if not isempty (request.form("B2"))thendim c1,r1set c1=server.createObject("adodb.connection")set r1=server.createObject("adodb.recordset")c1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath(".")&"\Dados\Dados.mdb;" set r1=c1.execute("select LOGIN,SENHA from usuarios where LOGIN='"& request.form("T1")&"'And SENHA='"& request.form("T2") &"'")if r1.eof then %><font color="#FF3300"> <center><% X= "Usuário/Senha Invalida" %> </center><%Else%><%session.contents("LOGIN")=request.form("T1")%><%response.clearResponse.redirect "login_entrada.asp"End ifr1.closec1.closeset r1=nothingset c1=nothing end if%><form method="POST" action="frame_login.asp"> <table width="44%" border="0" cellspacing="0" cellpadding="0" height="332"> <tr> <td> </td> </tr> <tr> <td background="\Imagens\fundoface.gif" height="306"> <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="5" color="#000000"><b><font face="Verdana" size="2"><br> <img src="Imagens\chave2.gif" width="35" height="34"><br> :: Acesso Restrito::</font></b><font face="Verdana" size="2"><br> <font size="1" color="#333333"> IP LOGADO</font><font color="#333333"><br> <b><font face="Verdana" size="2"> </font></b> <br> Tentativa de acesso ás:<b><font face="Verdana" size="2"> <%Response.Write(time)%> </font></b></font></font></font><br> </div> <table width="215" border="0" cellspacing="0" cellpadding="0" align="center" height="101"> <tr> <td width="44%" height="27"> <div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Login:</font></div> </td> <td width="56%" height="27"> <div align="left"> <input type="text" name="T1" size="20" maxlength="20"> </div> </td> </tr> <tr> <td width="44%" height="66" valign="top" rowspan="2"> <div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Senha:</font></div> </td> <td width="28%" height="25" valign="top"> <div align="left"> <input type="password" name="T2" size="11" maxlength="15"> <br> </div> </td> </tr> <tr> <td width="28%" height="2" valign="top"> <div align="center"> <input type="submit" value="Logar" name="B2" style="color: #FF3300; font-family: Arial"> </div> </td> </tr> </table> <tr> <td width="100%"> <font color="#000000"> <center><%response.write x%></center> </font></td> </tr> <tr> <td width="100%"> </td> </tr> <tr> <td width="100%"> </td> </tr> </table></form></font><p align="center"> </p></body></html>Depois crie um arquivo para ser a entrada quando a pessoa tiver feito o loginvamos fazer o arquivo login_entrada.asp<html><head><meta http-equiv="Content-Type" content="text/html; charset=windows-1252"><meta name="GENERATOR" content="Microsoft FrontPage 4.0"><meta name="ProgId" content="FrontPage.Editor.Document"><title>Entrada1</title></head><body><div align="center"> <p>Você efetuou o Login com sucesso!</p></div></body></html>Deu..Agora so precisa fazer um banco de dados.Para buscar os usuarios...Não sei se expliquei bem porque sou meio novato ainda...Qualquer coisa segue em baxo o link pra dowload dos arquivos e de um banco de dados pra ser usado...http://rapidshare.de/files/12338539/Login.zip.htmlObs:Observem onde o banco de dados esta localizado e modifique no arquivo... Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Super_Zica_Man
Estou postando meu sistema de login.
cria um arquivo frame_login.asp
<%response.cookies("LOGIN")("valor1")= request.form("T1")
response.cookies("LOGIN").expires= (date)+1 %>
<%response.buffer=true %>
<html>
<head>
<title>Entre com Usuário e Senha - Área de Login</title>
</head>
<body background="\Imagens\fundo.jpg" bgproperties="fixed">
<table align="center" width="100%" height="100%"><tr><td valign="middle" align="center">
<% if not isempty (request.form("B2"))then
dim c1,r1
set c1=server.createObject("adodb.connection")
set r1=server.createObject("adodb.recordset")
c1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath(".")&"\Dados\Dados.mdb;"
set r1=c1.execute("select LOGIN,SENHA from usuarios where LOGIN='"& request.form("T1")&"'And SENHA='"& request.form("T2") &"'")
if r1.eof then %>
<font color="#FF3300"> <center><% X= "Usuário/Senha Invalida" %> </center>
<%Else%>
<%session.contents("LOGIN")=request.form("T1")%>
<%response.clear
Response.redirect "login_entrada.asp"
End if
r1.close
c1.close
set r1=nothing
set c1=nothing
end if%>
<form method="POST" action="frame_login.asp">
<table width="44%" border="0" cellspacing="0" cellpadding="0" height="332">
<tr>
<td> </td>
</tr>
<tr>
<td background="\Imagens\fundoface.gif" height="306">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="5" color="#000000"><b><font face="Verdana" size="2"><br>
<img src="Imagens\chave2.gif" width="35" height="34"><br>
:: Acesso Restrito::</font></b><font face="Verdana" size="2"><br>
<font size="1" color="#333333"> IP LOGADO</font><font color="#333333"><br>
<b><font face="Verdana" size="2"> </font></b> <br>
Tentativa de acesso ás:<b><font face="Verdana" size="2">
<%
Response.Write(time)
%>
</font></b></font></font></font><br>
</div>
<table width="215" border="0" cellspacing="0" cellpadding="0" align="center" height="101">
<tr>
<td width="44%" height="27">
<div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Login:</font></div>
</td>
<td width="56%" height="27">
<div align="left">
<input type="text" name="T1" size="20" maxlength="20">
</div>
</td>
</tr>
<tr>
<td width="44%" height="66" valign="top" rowspan="2">
<div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Senha:</font></div>
</td>
<td width="28%" height="25" valign="top">
<div align="left">
<input type="password" name="T2" size="11" maxlength="15">
<br>
</div>
</td>
</tr>
<tr>
<td width="28%" height="2" valign="top">
<div align="center">
<input type="submit" value="Logar" name="B2" style="color: #FF3300; font-family: Arial">
</div>
</td>
</tr>
</table>
<tr>
<td width="100%"> <font color="#000000"> <center><%response.write x%></center> </font></td>
</tr>
<tr>
<td width="100%">
</td>
</tr>
<tr>
<td width="100%">
</td>
</tr>
</table>
</form>
</font>
<p align="center"> </p>
</body>
</html>
Depois crie um arquivo para ser a entrada quando a pessoa tiver feito o login
vamos fazer o arquivo login_entrada.asp
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Entrada1</title>
</head>
<body>
<div align="center">
<p>Você efetuou o Login com sucesso!</p>
</div>
</body>
</html>
Deu..
Agora so precisa fazer um banco de dados.Para buscar os usuarios...
Não sei se expliquei bem porque sou meio novato ainda...
Qualquer coisa segue em baxo o link pra dowload dos arquivos e de um banco de dados pra ser usado...
http://rapidshare.de/files/12338539/Login.zip.html
Obs:Observem onde o banco de dados esta localizado e modifique no arquivo...
Link para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.