Problema Com Login

PRISCILA STOCHINI · Agosto 17, 2006

Bom, estou desenvolvendo um sistema de login, com senha...

Então eu crio o formulario para acesso...esse conecta uma página de validação...e essa deveria conectar o bd e liberar o acesso...

Bom já testei de tudo....o problema está sendo...

quando eu coloco o login dá um erro....sem o login dá o mesmo erro e com o login errado também...

O que pode ser..qm pode me ajudar...

cyberalexxx · Agosto 17, 2006

Poste o seu código e o erro que esta dando, ai podemos ajudar!

PRISCILA STOCHINI · Agosto 17, 2006

INDEX

<%
MSN = request.querystring("erro")
If MSN = 1 Then
mensagem = "Usuário e/ou Senha inválido!"
End If
If MSN = 2 Then
mensagem = "Você precisa se logar para visualizar o conteúdo deste site!"
End If
If MSN = 3 Then
mensagem = "Você deslogou do sistema. Obrigado e volte sempre."
Response.AddHeader "refresh","3;url=index.asp"

End if
%>
(...)

  <form method="post" action="valida.asp">
            <font size="2" face="Arial, Helvetica, sans-serif">Login:</font>
              <input type="text" name="nome" size="11">
              <br/>
              <font size="2" face="Arial, Helvetica, sans-serif">Senha:</font>
              <input type="password" name="senha" size="11">            
              <input type="submit" value="[ OK ]" style="background-color:#dddddd; border:1px; border-color:#dddddd; cursor:hand;">
(...)

VALIDA

<%

vuser = Request.Form("nome")

vpass = Request.Form("senha")

Dim sql, rs, bco

sql = "select * from usuarios where nome='"&vuser&"' and senha='"&vpass&"'"

Abreconn

Set rs = bco.execute(sql)

If rs.eof Then

rs.close

Set rs = Nothing

fechaconn

Response.Redirect "index.asp?erro=1"

Else

Session("login") = True

Session("nome") = vuser

rs.Close

Set rs = Nothing

fechaconn

Response.Redirect "PRINCIPALXYZ000.htm"

End if

%>

CONECTA

<%

Sub AbreConn

Dim bco, sql, rs

Set bco = Server.CreateObject("ADODB.Connection")

bco.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("usuarios.mdb")

End Sub

'-----------------------------

Sub FechaConn

bco.close

Set bd = Nothing

End sub

%>

cyberalexxx · Agosto 17, 2006

Quando voce fala que da erro, é erro no script (se for poste o erro e alinha) ou as mensagens de erros programadas na index (qual mensagem esta aparecendo)??

PRISCILA STOCHINI · Agosto 17, 2006

O erro que dá é o programado no INDEX...dá o erro 2

If MSN = 2 Then

mensagem = "Você precisa se logar para visualizar o conteúdo deste site!"

PRISCILA STOCHINI · Agosto 17, 2006

QUEM PODE ME AJUDAR...preciso resolver isso hoje!!!

filipeflc00 · Agosto 17, 2006

olha um que eu fiz

quem sabe possa te ajudar

usuario.asp

<html>
<body>
<form name="form1" method="post" action="login2.asp" onsubmit="return ValidaCadastro()">
<center><img src="logo_adm.jpg"></center>
<table border="0" width="100%" align="center" cellpadding="0" cellspacing="0">
  <tr >
    <td align="right" valign="top" width="40%"><font face="Arial" size="2"><font size="1" face="Verdana" color="#ffffff"><b>USU&Aacute;RIO:</b></font></font></td>
    <td align="left" valign="top" width="60%" >
      <font face="Arial" size="2">
    <input type="text" name="Login" value="<%=Session("nome2")%>" size=15 maxlength=50 class="fields" class="Procurar" onFocus="this.className='Procurar';" onBlur="this.className='Procurar2';">
    </td>
  </tr>
  <tr>
    <td align="right" valign="top" width="40%"><font face="Arial" size="2"><font size="1" face="Verdana" color="#ffffff"><b>SENHA:</b></font></font></td>
    <td align="left" valign="top" width="60%">
      <font face="Arial" size="2">
    <input type="password" name="Senha" value="" size="15" maxlength="50" class="fields" class="Procurar" onFocus="this.className='Procurar';" onBlur="this.className='Procurar2';"> <input type="submit" name="submit" value="ok" class="fields" style="width:20px; background-color:#CC0000; color:#ffffff">
    </td>
    
  </tr>

  </font>
</table>
</form>
</body>
</html>

login2.asp

<%




objConn.Open conex

strSql = "select * from login where login = '"&replace(request.form("login"),"'"," ")&"' and senha = '"&replace(request.form("senha"),"'"," ")&"'"
set objRS = ObjConn.execute(strSql)
Session("nome2") = request.form("login")
Login = objRS("login")
Senha = objRS("senha")
Session("perm")  = objRS("permissao")
Session("nome") = objRS("login")
Session("id") = objRS("id")
Session("func") = objRS("nm_func")

If login = "" Or senha = "" Then
  %>
     <body <%=colorbg1%>>
      <script language="javascript">
       alert("Usuario ou Senha Incorreto !");
       window.location = 'usuario.asp?error=Acesso%20Negado,%20Usuario%20ou%20Senha%20Está%20Incorreto'
      </script>
      <%
      
      response.end
      End if

If not ObjRs.eof or ObjRs.bof then 
Session("logado")="sim"
Response.Redirect"sisten_adm/default.asp"
else
Response.Redirect"usuario.asp"
end if

Set objRs = Nothing
objConn.close
Set objConn = Nothing

if err = 0 Then
    Response.Redirect"adsadadmin.asp"
end if

%>

está funfando file

qualquer coisa poste ai

to meio sem tempo para olhar seu cod

valws

PRISCILA STOCHINI · Agosto 17, 2006

Alguém em ajuda...não que uero mudar muito meu código porque tenho um padrão..só não sei porque está dando esse erro maluco...

qualquer cois que eu faço dá o mesmo erro!!!

Marcos-rj · Agosto 17, 2006

Dei uma olhada rápida e não vi nada de estranho, só dei uma alterada na ordem, na duvita testa p/ ver.

<%response.buffer = true%>
<%
vuser = Replace(Trim(request.form("nome")), "'", "/")
vpass = Replace(Trim(request.form("senha")), "'", "/")

Abreconn

Set RS = bco.execute("select * from usuarios where nome='"&vuser&"' and senha='"&vpass&"' ")

If not rs.eof Then

Session("login") = True
Session("nome") = rs("nome")
rs.Close
Set rs = Nothing
fechaconn

Else

Response.Redirect "PRINCIPALXYZ000.htm"
rs.close
Set rs = Nothing
fechaconn
Response.Redirect "index.asp?erro=1"

End if
%>

tem algum dado nesta tabela?

PRISCILA STOCHINI · Agosto 17, 2006

Não sei mais o que fazer...

Vou colocar aqui todo os códigos, por favor pço imploradamente que alguém me ajude a responder...

INDEX.ASP

<%
MSN = request.querystring("erro")
If MSN = 1 Then
mensagem = "Usuário e/ou Senha inválido!"
End If
If MSN = 2 Then
mensagem = "Você precisa se logar para visualizar o conteúdo deste site!"
End If
If MSN = 3 Then
mensagem = "Você deslogou do sistema. Obrigado e volte sempre."
Response.AddHeader "refresh","3;url=index.asp"

End if
%>
<html>
<head>
<title>Multiplus - Softwares Tecnicos</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
<style type="text/css">
<!--
body {
    margin-left: 0px;
    margin-top: 0px;
    margin-right: 0px;
    margin-bottom: 0px;
}
.link02{
    font-family: Arial, Helvetica, sans-serif;
    font-style: normal;
    line-height: normal;
    text-decoration: none;
    color:#000000;
    font-weight: normal;
    font-size: 12px;
}
a.link02:hover{
    font-family: Arial, Helvetica, sans-serif;
    font-style: normal;
    line-height: normal;
    text-decoration: none;
    color:#FF0000;
    font-weight: normal;
    font-size: 12px;
}
.link01{
    font-family: Arial, Helvetica, sans-serif;
    font-style: normal;
    line-height: normal;
    text-decoration: none;
    color:#ffffff;
    font-weight: bold;
    font-size: 12px;
}
a.link01:hover{
    font-family: Arial, Helvetica, sans-serif;
    font-style: normal;
    line-height: normal;
    text-decoration: none;
    color:#FF0000;
    font-weight: normal;
    font-size: 12px;
}
.titulo {
    font-family: Arial, Helvetica, sans-serif;
    font-size: 16px;
    font-weight: bold;
    text-decoration: none;
    color: #000000;
    line-height: normal;
    font-style: normal;
}
.link021 {    font-family: Arial, Helvetica, sans-serif;
    font-style: normal;
    line-height: normal;
    text-decoration: none;
    color:#000000
}
.style12 {font-family: Arial, Helvetica, sans-serif}
.style15 {font-family: Arial, Helvetica, sans-serif; font-size: 14px; font-weight: bold; }
.style3 {font-size: 12px}
.rodape {
    font-family: Arial, Helvetica, sans-serif;
    font-size: 12px;
    font-weight: bold;
}
.style5 {font-size: 12px; font-family: Arial, Helvetica, sans-serif; }
-->
</style>
</head>
<body scroll="no">
<table width="100%" height="594" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="140" height="60" background="Pictures_Inicial/fundo_1.gif"><div align="center"><font color="#FFFFFF" size="5" face="Arial, Helvetica, sans-serif"><strong>MULTIPLUS<br>
    <font size="2">Softwares T&eacute;cnicos</font></strong></font></div>    </td>
    <td colspan="2" valign="bottom" background="Pictures_Inicial/fundo_2.gif" bgcolor="#FFFFFF"><div align="right"><font color="#FFFFFF"><a href="http://www.cype.com.br" class="link01">Home</a> | <a href="Empresa.htm" class="link01">Empresa</a> | <a href="Treinamentos.htm" class="link01">Cursos e Eventos</a> | <a href="Atendimento_VIP.htm" class="link01">Atendimento Vip</a> | <a href="Precos.htm" class="link01">Pre&ccedil;os</a> | <a href="Oportunidades.htm" class="link01">Oportunidades</a> | <a href="Fale_Conosco.htm" class="link01">Fale Conosco</a></font></div></td>
  </tr>
  
  <tr>
    <td width="140" height="10" rowspan="3" valign="top" bgcolor="#FFFFFF"><table width="140" border="0" cellspacing="1">
      <tr>
        <td width="200" height="19" rowspan="2" bgcolor="#00CCFF"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>CONCRETO ARMADO</strong></font></td>
        </tr>
      <tr> </tr>
      <tr>
        <td width="200" height="19" bgcolor="#C7E7FE"><a href="CYPECAD/CYPECAD.htm" class="link02">CYPECAD</a></td>
        </tr>
      <tr>
        <td width="200" height="19" bgcolor="#C7E7FE"><a href="PRE_MOLDAR/Pre-Moldar.htm" class="link02">Pr&eacute; -          MOLDAR</a></td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="PRO_ARMAR/Pro_Armar.htm" class="link02">PR&Oacute; - Armar</a></div>          </td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="PRO_ALVENARIA/PRO-Alvenaria.htm" class="link02">PR&Oacute; -  Alvenaria</a></div>          </td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="FUNDACOES/Fundacoes.htm" class="link02">Funda&ccedil;&otilde;es</a></div>          </td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="GALERIAS/Galerias.htm" class="link02">Galerias</a></td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="MURO_DE_ARRIMO/Muro de Arrimo.htm" class="link02">Muro de Arrimo</a></td>
        </tr>
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C7E7FE"><a href="CORTINAS/Cortinas Atirantadas.htm" class="link02">Cortinas Atirantadas</a></td>
        </tr>
      </table>
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#33CCCC"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>MET&Aacute;LICAS</strong></font></div></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><a href="METALICAS_3D/Metalicas3D.htm" class="link02">Met&aacute;licas 3D</a></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">Gerador de Galp&otilde;es</span></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><a href="TECNOMETAL/TecnoMetal.htm" class="link02">TecnoMETAL</a></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">TecnoSTEEL</span></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">Gest&atilde;o de Materiais</span></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">Gest&atilde;o de Fabrica</span></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">Controle - CAM</span></td>
        </tr>
        <tr>
          <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#C8F7F2"><span class="style5">MultiMETAL</span></td>
        </tr>
      </table>    
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#66cdaa"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>TUBULA&Ccedil;&Acirc;O</strong></font></div></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#e0ffff"><a href="EPLANT/EPLANT.htm" class="link02">EPLANT</a></td>
        </tr>
      </table>   
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FF666A"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>ELEMENTOS FINITOS</strong></font></div></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FFAEBC"><a href="SAP/SAP.htm" class="link02">SAP2000</a></td>
        </tr>
    </table>    </td>
    <td width="699" height="110" align="center" valign="middle"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="698" height="110">
      <param name="movie" value="FLASH/Abertura_site.swf">
      <param name="quality" value="high">
      <embed src="FLASH/Abertura_site.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="698" height="110"></embed></object></td>
    <td width="140" height="18" rowspan="3" valign="top" bordercolor="#FFFFFF"><table width="140" border="0" cellspacing="1">
      <tr>
        <td width="200" height="19" bordercolor="#FFFFFF" bgcolor="#FF9598"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>ARQUITETURA</strong></font></div></td>
        </tr>
      <tr>
        <td height="19" bordercolor="#FFFFFF" bgcolor="#FFE4E1"><a href="M2ARQ/M2ARQ.htm" class="link02">M2*Arq</a></td>
        </tr>
      </table>     
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#04DD20"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>OR&Ccedil;AMENTO</strong></font></div></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#CAFEC9"><a href="ARQUIMEDES/Apresentacao.htm" class="link02">Arquimedes</a></td>
        </tr>
      </table>
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FF8C69"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>INSTALA&Ccedil;&Otilde;ES</strong></font></div></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FFE4C4"><a href="ELETRICA/PRO-Eletrica.htm" class="link02">PRO - Eletrica</a></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FFE4C4"><a href="HIDRAULICA/PRO-Hidraulica.htm" class="link02">PRO - Hidraulica</a></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FFE4C4"><a href="AR_CONDICIONADO/PRO-ArCondicionado.htm" class="link02">PRO - ArCondicionado</a></td>
        </tr>
        <tr>
          <td height="19" bordercolor="#FFFFFF" bgcolor="#FFE4C4"><a href="REDES_URBANAS/Redes_Urbanas.htm" class="link02">Redes Urbanas</a></td>
        </tr>
      </table>
      <br>
      <table width="140" border="0" cellspacing="1">
        <tr>
          <td height="20" bordercolor="#FFFFFF" bgcolor="#8F9A99"><div align="center"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>SUPORTE T&Eacute;CNICO</strong></font></div>            </td>
        </tr>
        <tr>
          <td height="20" bordercolor="#FFFFFF" bgcolor="#DDDDDD"><div align="center" class="style5">SIM - Suporte por Internet Multiplus</div></td>
        </tr>
        <tr>
          <td height="20" bordercolor="#FFFFFF" bgcolor="#DDDDDD"><div align="center"><strong><font color="#000033" size="2" face="Arial, Helvetica, sans-serif">ACESSO USU&Aacute;RIOS</font></strong></div></td>
        </tr>
        <tr>
          <td height="70" align="center" bordercolor="#FFFFFF" bgcolor="#DDDDDD">
          <form method="post" action="valida.asp">
            <font size="2" face="Arial, Helvetica, sans-serif">Login:</font>
              <input type="text" name="nome" size="11">
              <br/>
              <font size="2" face="Arial, Helvetica, sans-serif">Senha:</font>
              <input type="password" name="senha" size="11">            
              <input type="submit" value="[ OK ]" style="background-color:#dddddd; border:1px; border-color:#dddddd; cursor:hand;">
              <br><font face="Arial, Helvetica, sans-serif" size="2">
              <script language="javascript">
             alert { ("<%=mensagem%>")
              }
             </script>
              </font>
          </form>
          </td>
        </tr>
      </table>
        <br>
        <table width="140" height="43" border="0" cellspacing="1">
        <tr>
          <td height="20" bgcolor="#009DDC"><font color="#000000" size="2" face="Arial, Helvetica, sans-serif"><strong>NOTICIAS</strong></font></td>
        </tr>
        <tr>
          <td height="20" bgcolor="#66CCFF">
          </td>
        </tr>
    </table>
    </td>
  </tr>
  <tr>
    <td height="380" align="center" valign="middle"><p align="center" class="style12"><font size="4">Software em destaque: <A href="http://www.multiplus.com/Softwares/Metalicas/Detalhamento/TecnoMetal/tecnometal_4.htm" class="link021"><strong>TecnoMETAL- 4D</strong></A></font><br>
          <br>
          <span class="style15">O software mais   utilizado no Brasil para&nbsp;
            Detalhamento e Fabrica&ccedil;&atilde;o de Estruturas   Met&aacute;licas</span></p>
      <p align="center" class="style3"><img src="file:///C|/Documents and Settings/I-Parc3/Meus documentos/SITE/METALICAS_3D/Imagens/GIF_PRINCIPAL.gif" width="318" height="236"><br>
          <br>
          <span class="style12">Conhe&ccedil;a tamb&eacute;m:</span><strong>&nbsp; <A href="http://www.multiplus.com/Softwares/Metalicas/Detalhamento/TecnoMetal/tecnometal_2004.htm" class="link021">TecnoMETAl-2D</A> </strong><span class="style12">e</span><strong> <A href="http://www.multiplus.com/Softwares/Metalicas/Detalhamento/TecnoMetal/tecnometal_2002.htm" class="link021">TecnoMETAL-EL</A>&nbsp;<BR>
        </strong><span class="style12">Conhe&ccedil;a nossa&nbsp; <A href="http://www.multiplus.com/Softwares/Metalicas/metalicas_2000.htm" class="link021"><strong>Linha de Softwares para Estruturas   Met&aacute;licas</strong></A> </span></p>      </td>
  </tr>
  <tr>
    <td><hr width="80%" color="#CCCCCC">
        <div align="center"><span class="rodape">Multiplus Softwares T&eacute;cnicos - Pra&ccedil;a da Republica, 386 - 6&ordm; andar - Republica - S&atilde;o Paulo/SP</span></div></td>
  </tr>
</table>
</body>
</html>

VALIDA.ASP

<!--#include file="conecta.asp"-->
<!--#include file="session.asp"-->
<%

vuser = Replace(Trim(request.form("nome")), "'", "/")
vpass = Replace(Trim(request.form("senha")), "'", "/")

'vuser = Request.Form("nome")
'vpass = Request.Form("senha")

Dim sql, rs, bco

'sql = "select nome, senha from usuarios where nome='"&vuser&"' and senha='"&vpass&"'"

Abreconn

Set rs = bco.execute("select nome, senha from usuarios where nome='"&vuser&"' and senha='"&vpass&"'")

If rs.eof Then
    Session("login") = True
    Session("nome") = rs("nome")
    rs.Close
    Set rs = Nothing
    fechaconn
    Response.Redirect "PRINCIPALXYZ000.htm"
Else
    rs.close
    Set rs = Nothing
    fechaconn
    Response.Redirect "index.asp?erro=1"
End if

%>

CONECTA.ASP

<%

Sub AbreConn

Dim bco, sql, rs

Set bco = Server.CreateObject("ADODB.Connection")

bco.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("usuarios.mdb")

End Sub

'-----------------------------

Sub FechaConn

bco.close

Set bd = Nothing

End sub

%>

BOM O ERRO QUE DÁ É O 2...EU DIGITANDO A SENHA E O LOGIN CORRETO, SEM DIGITAR E DIGITANDO ERRADO, DÁ O MESMO ERRO .....

estou IMPLORANDO PRA ALGUÉM ME AJUDAR...URGENTE!!!!!

filipeflc00 · Agosto 17, 2006

coloca se DB pra download pra gente pegar para testar ai

valw

Marcos-rj · Agosto 17, 2006

você consegue fazer um Select básico neste banco p/ exibir os dados? tem realmente algum dado neste banco?

PRISCILA STOCHINI · Agosto 17, 2006

É UMA ACCESS NORMAL DE TITULO USUARIOS.MDB ...TABELA USUARIO CAMPOS NOME E SENHA

Marcos-rj · Agosto 17, 2006

Certo, se o nome da tabala é usuario , você esta chamando errado no select

Set rs = bco.execute("select nome, senha from usuarios where nome='"&vuser&"' and senha='"&vpass&"'")

viu, no select esta USUARIOS e não USUARIO.

PRISCILA STOCHINI · Agosto 17, 2006

RETIFICANDO....O NOME TANTO DO BD quanto DA TABELA É USUARIOS...

filipeflc00 · Agosto 17, 2006

entaum coloca para download ai o banco de dados

para que possamos testar aqui

falws

PRISCILA STOCHINI · Agosto 17, 2006

como faço isso???

Marcos-rj · Agosto 17, 2006

está complica, faz o seguinte, monta uma pagina de teste simples e usando o mesmo código de conexão faz um select e manda exibir os dados, vê se dá algum erro.

montei aqui rápido uma pagina para você testar, tenta aí e diz se dá algum erro.

Fiz em cima dos dados que você passou.

<html>
<!--#include file="conecta.asp"-->
<head>
<meta http-equiv="Content-Language" content="pt-br">
<%
Abreconn
Set rs = bco.execute("select nome, senha from usuarios order by nome")
%>
<title>Página de teste</title>
</head>

<body>

<table border="1" width="444" id="table1">
    <tr>
        <td width="220" align="center" bgcolor="#E5E5E5"><b>
        <font face="Verdana">NOME</font></b></td>
        <td width="220" align="center" bgcolor="#E5E5E5"><b>
        <font face="Verdana">SENHA</font></b></td>
    </tr>
<%
If rs.EOF or rs.BOF Then
Response.Write "<font face=Verdana size=2>Não foi encontrado nenhum registro.</font>"
Else
Do While not rs.EOF%>    
    <tr>
        <td width="220">&nbsp;<b><font face="Verdana" size="2"><%=rs("nome")%></font></b></td>
        <td width="220">&nbsp;<b><font face="Verdana" size="2" color="#FF0000"><%=rs("senha")%></font></b></td>
    </tr>
<%
rs.MoveNext
Loop
End If%>    
</table>
</body>
</html>

filipeflc00 · Agosto 17, 2006

e esse arquivo session.asp

kd ele??

Marcos-rj · Agosto 17, 2006

não sei o tem nele, mas acredito que neste teste que passei seja necessario.

PRISCILA STOCHINI · Agosto 17, 2006

SESSION.ASP

<%
If Session ("login") = False Then
Response.Redirect "index.asp?erro=2"
End If

Response.Expires = -1000
%>

Marcos-rj · Agosto 17, 2006

Priscila faz o seguinte, tira o include  da página de validação!

por isso está dando erro!

você está redirecionando a pesso antes dela se logar!

filipeflc00 · Agosto 17, 2006

mas ainda assim o select dela está dando erro

testei aqui

ele tem que revisar esse select dela

falws

PRISCILA STOCHINI · Agosto 17, 2006

Vou testar...outra coisa..como eu faço pra essa mensagem de erro aparecer como uma mensagem de "alert" do windows???

Como javascript...posso colocar a variavel mensagem dentro da tag de alert do javascript????

Marcos-rj · Agosto 17, 2006

tenta assim:

<%
If Session ("login") = False Then
response.write("<script>location = 'index.asp';alert('MENSAGEM DE ERRO.')</script>")
End If
Response.Expires = -1000
%>

filipeflc00 · Agosto 17, 2006

pod sim

alert("Mensagem")

</script>

Entrar

Problema Com Login

Pergunta

Link para o comentário

Compartilhar em outros sites

Top Posters For This Question

Dias Populares

Top Posters For This Question

Dias Populares

52 respostass a esta questão

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns