Redirecionamento Falhando!

[victormartins]

O sistema de login aqui que eu toh fazendo ele manda redirecionar quando não é verdadeiro o login, o problema é quando o login é falso ele não redireciona e 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.

/corisco/login.asp, line 11

login.asp

<%

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

conexao.Open "Provider=Microsoft.JET.OLEDB.4.0; Data Source=" & server.MapPath("dados/L/g/v/naovaidescobrir.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"admin.asp"

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

end if

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

%>

Vlw.

[Nadia Amorim]

Olá tudo bem,

Verifica se a tabela que tem estes campos de usuario e senha tem informações, pois pode estar acontecendo de você estar tentando logar sendo que não tem informações no banco..

Qualquer coisa me adiciona no MSN.

[ju_rezende]

Coloca este código antes do html, pois se o redirect vier depois do html ele não funciona, mas não esqueça de verificar o que nossa amiga nadia disse.

[Guest Visitante]

Tem 3 usuarios no bd e não tem HTML na pagina!

[.Andreia.]

colega, você está mandando atribuir o resultado do banco sem fazer uma verificaçao se existe ou não. Por isso gera este erro. então faça assim:

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"admin.asp"

[victormartins]

Vlw