VBScript Error

[Marcus Barretto 0]

Caros,

 

estou com um problema num arquivo:

 

 

Erro de tempo de execução do Microsoft VBScript erro '800a000d'

 

Tipos incompatíveis

 

/Teste/otimizacao.asp, line 804

 

 

essa é a linha 804:

 

sqlLOGIN = "SELECT dados.user, dados.nome, dados.email, dados.tel FROM dados WHERE (dados.user='" & login & "')"

 

sei q o problema está na variável login, ja troquei ela pelo valor desejado e funcionou.

Mas não to entendendo esse erro.

 

 

o código de onde puxo a variável é:

 

set objconn=server.CreateObject("ADODB.connection")

objconn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("\usuarios.mdb")& "; Uid=""; Pwd="";"

 

Dim sqlLOGIN, login

 

login=trim(request.Querystring("login"))

 

Set LOGIN = Server.CreateObject("ADODB.Recordset")

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE (dados.user='" & login & "')" '<==== linha 804

LOGIN.Open sqlLOGIN, objconn, adOpenStatic, adLockPessimistic

 

 

Alguém pode me dar uma luz?!

 

 

Abraços!

[jrcardozo 4]

faça isso

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE (dados.user='" & login & "')"response.write sqlloginresponse.end

e post aqui o que aparecer no browser

[Marcus Barretto 0]

Aparece o seguinte:

 

SELECT dados.nome, dados.email, dados.tel FROM dados WHERE (dados.user='mpbarretto')

 

 

 

porém se eu retirar o response.end

 

aparece o seguinte:

 

SELECT dados.nome, dados.email, dados.tel FROM dados WHERE (dados.user='mpbarretto')

 

Erro de tempo de execução do Microsoft VBScript erro '800a000d'

 

Tipos incompatíveis

 

/Teste/otimizacao.asp, line 808

 

 

o erro continua... http://forum.imasters.com.br/public/style_emoticons/default/upset.gif

 

o nome de usuário que aparece na query está certo...

o q pode ser isso?

 

===============================================================

UPDATE!

 

O código tinha ficado assim:

 

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

response.write sqllogin

'response.end

 

 

Set LOGIN = Server.CreateObject("ADODB.Recordset")

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

LOGIN.Open sqlLOGIN, objconn, adOpenStatic, adLockPessimistic

 

 

fiz o seguinte, retirei a linha em negrito:

 

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

response.write sqllogin

'response.end

 

 

Set LOGIN = Server.CreateObject("ADODB.Recordset")

'sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

LOGIN.Open sqlLOGIN, objconn, adOpenStatic, adLockPessimistic

 

 

Passou a funcionar, mas apresenta o seguinte erro:

 

Objeto Response erro 'ASP 0185 : 8002000e'

 

Propriedade padrão ausente

 

/Teste/otimizacao.asp, line 0

 

Não foi encontrada uma propriedade padrão do objeto.

 

 

???????

[Marcus Barretto 0]

Jonathan, obrigado pela ajuda

já consegui resolver o problema

 

não entendi muito bem, mas agora está funcionando.

fiz o seguinte:

 

 

sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

'response.write sqllogin

'response.end

 

 

Set rstLOGIN = Server.CreateObject("ADODB.Recordset")

 

'sqlLOGIN = "SELECT dados.nome, dados.email, dados.tel FROM dados WHERE dados.user='" & login & "'"

 

rstLOGIN.Open sqlLOGIN, objconn, adOpenStatic, adLockPessimistic

 

 

 

DIM nome, telefone, email

 

nome = rstLOGIN("nome")

email = rstLOGIN("email")

telefone = rstLOGIN("tel")

 

rstLOGIN.close

%>

 

....

 

 

<input type="hidden" name="login" value="<%response.write(login)%>">

 

 

como pode ver, um pouco mais abaixo no código eu tinha esse response.write(login)

como essa variável já tinha dado problema, desconfiei dela

então fiz:

 

response.write(login)

response.end

 

e pra minha surpresa ele escreveu

font face=

 

?!??!?!?!?!?

 

resolvi trocar o nome do objeto LOGIN para rstLOGIN

pois imaginei a variável login estar em conflito com o objeto LOGIN

 

deve ter sido este o problema

pois agora está tudo funcionando perfeitamente.

 

Se o problema tiver sido outro q eu não tenha percebido

me da uma avisada, aprender nunca é pouco!!!

 

mais uma vez obrigado,

abraços

Marcus