Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas Na Hora De Redirecionar Usuario Se Enha Estiver Invalida


victormartins

Pergunta

é o seguinte, o sistema de login aqui está dando um erro na hora de verificar se o usuario e senha são validos na hora de redirecionar, ai vai o cod

login.asp

<%

set conexao = server.createObject("adodb.connection")

conexao.Open "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & server.MapPath("dados/bdl.mdb")

sql = "select * from login where login = '"&request.form("login")&"' and senha = '"&request.form("senha")&"'"

set rsLogin = conexao.execute(sql)

Login = rsLogin("login")
Senha = rsLogin("senha")

if not rsLogin.eof then

Session("login")=TRUE
Session("senha")=TRUE
Session.Timeout = 120
Response.Redirect "fotos.asp"

else
Session("login")=False
Session("senha")=False
Response.Redirect "logar.asp"

end if


conexao.close
rsLogin.close
set conexao = nothing
set rsLogin = nothing

%>

e quando digita o usuario ou senha invalidos ou não digita nada ele da esse erro:

Tipo de erro:

ADODB.Field (0x800A0BCD)

BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.

/sapientia/login.asp, line 11

linha 11:

Login = rsLogin("login")

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

se não encontrou o usuario, não tem nada no rsLogin. o que significa que vai dar erro msmo se você tentar acessar algum campo nele.

acho que assim seria o certo:

<%

set conexao = server.createObject("adodb.connection")

conexao.Open "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & server.MapPath("dados/bdl.mdb")

sql = "select * from login where login = '"&request.form("login")&"' and senha = '"&request.form("senha")&"'"

set rsLogin = conexao.execute(sql)

if not rsLogin.eof then

Login = rsLogin("login")
Senha = rsLogin("senha")

Session("login")=TRUE
Session("senha")=TRUE
Session.Timeout = 120
Response.Redirect "fotos.asp"

else
Session("login")=False
Session("senha")=False
Response.Redirect "logar.asp"

end if


conexao.close
rsLogin.close
set conexao = nothing
set rsLogin = nothing

%>[/code]

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...