Ir para conteúdo
Fórum Script Brasil

† AqUaMaN «QÐÑ» †

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    3

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Tudo que † AqUaMaN «QÐÑ» † postou

  1. † AqUaMaN «QÐÑ» †
    e ae beleza, isso ae eu arrumei ta acessando so em senha.mdb agora preciso do select case pra redireciona pra varias paginas Muito grato, Junior QDN
  2. † AqUaMaN «QÐÑ» †
    e ae reginaldo vou seguir seu conselho vo posta aqui o codigo, mas acontece o seguinte, cada usuario vai ter q ser redirecionado para uma pagina diferente entendeu? e outro problema q estou tendo é q quando coloco o login e a senha fala q não é possivel abrir a pagina acho q esta com problema na conexao com o banco de dados, se possivel analisem o codigo abracos Index.asp <html> <head> <title>Acesso Restrito</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body bgcolor="#FFFFFF" text="#000000" > <p>&nbsp;</p> <form method="get" action="login.asp"> <div align="center"> <table width="44%" border="0" cellspacing="0" cellpadding="0" height="332"> <tr> <td>&nbsp;</td> </tr> <tr> <td background="fundo2.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="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"> <% Response.Write request.servervariableS("REMOTE_ADDR") %> </font></b> <br> Tentativa de acesso &aacute;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="login" 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="senha" size="11" maxlength="15"> <br> </div> </td> </tr> <tr> <td width="28%" height="2" valign="top"> <div align="right"> <input type="image" border="0" name="imageField" src="x.gif" width="30" height="32"> </div> </td> </tr> </table> <div align="center"><br> <font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FF0000">Login: Administrador<br> Senha: 123</font></div> </td> </tr> </table> <br> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div> <p></p> </form> </body> </html> Conexao com o banco de dados (Login.asp) <% conexao="DBQ=g:\www\vhosts\superasp\superasp\web\login\senha.mdb;Driver={Microsoft Access Driver (*.mdb)}" Set DB = Server.CreateObject("ADODB.Connection") DB.Open conexao login=(Request.QueryString("login")) senha=(Request.QueryString("senha")) set acesso=DB.Execute("SELECT * FROM acesso WHERE login='"&login&"' AND senha='"&senha&"' ") if acesso.eof then Response.Redirect"negado.asp" else Session("login")=login 'Session("usuario")= acesso("usuario") 'Session("Email")= acesso("Email") Session("login")= acesso("login") Response.Redirect"acesso.asp" end if DB.close %> Muito grato, Junior QDN
  3. † AqUaMaN «QÐÑ» †
    e ae pessoal beleza, entaum so novo aqui no forum sobre asp/asp.net e estou desenvolvendo um site q irei usar um script em asp, mas estou com dificuldades em suas configuracoes o scriprt que irei usar é esse, estou testando ele no IIS5, o procedimento q estou fazendo é o seguinte, rstou executando o arquivo index.asp ele abre normal, mas quando tento logar ele da esse caminho - http://localhost/login.asp?login=Administr...imageField.y=16 e no banco de dados em acess tem uma conta com o login administrador e senha 123. espero ajuda ae quem puder me ajudar ou dar allgumas dicas eu agradeco. Muito Grato, Junior QDN
×
×
  • Criar Novo...