Login para de Funcionar

[fabiosc80 0]

Tenho uma tela de login que tava funcionando perfeitamente ai derrepente parou de funcionar e começou a dar esse erro aqui:

 

Microsoft VBScript runtime error '800a01a8'

 

Object required: ''

 

/olho/check.asp, line 25

 

A linha é essa aqui:

 

SET TB = BC.Execute(SQ)

 

que faz referencia a essa query...

 

SQ = "SELECT * FROM Login WHERE User = '" & Session("User") & "' and Senha = '" & Session("Senha") & "'"

 

Não sei pq parou de funcionar, não sei mesmo. Pior que issotem que ficar pronto pela amanha, ou melhor ficar pronto denovo né?

 

Estou colocando o código todo tambem pra verem.

 

ASP [/tr][tr]<!--#include file="conexao.asp"-->

<%

'Recuperando os dados

 

Session("User") = Replace(request("User"),"'","")

Session("Senha") = Replace(request("Senha"),"'","")

 

If Session("User") = Empty Then

Session("mensagem") = "O campo User é obrigatório !"

Response.Redirect("index.asp")

End IF

 

If Session("Senha") = Empty Then

Session("mensagem") = "O campo SENHA é obrigatório !"

Response.Redirect("index.asp")

End IF

 

Dim BC,TB,SQ

 

AbreBanco

 

 

SQ = "SELECT * FROM Login WHERE User = '" & Session("User") & "' and Senha = '" & Session("Senha") & "'"

 

SET TB = BC.Execute(SQ)

 

IF TB.EOF THEN

Session("mensagem") = "User e SENHA inválidos !"

FechaBanco

Response.Redirect("index.asp")

Else

session("Cod") = TB("CodigoUser")

FechaBanco

 

Response.Redirect("admin.asp")

End IF

%>

 

 

Por favor, Oque esta acontecendo?

[/tr]

[fabiosc80 0]

Pode esquecer , eu tinha mudado um negócio no arquivo de conexao e por isso tava dando pau.Fica pra quem quiser um exemplo de Login e Senha Simples ai.

[Mário Monteiro 179]

Pode esquecer , eu tinha mudado um negócio no arquivo de conexao e por isso tava dando pau.Fica pra quem quiser um exemplo de Login e Senha Simples ai.

era isso que ia dizer que tava faltando declarar o BC na conexao, mas vi seu post e que você mesmo achou o erro...