Porq Esse Erro

[crucifier]

porq ta danu esse erro?o.O

Microsoft VBScript runtime error '800a01ca'

Variable uses an Automation type not supported in VBScript

/sistema/prefeitura/ano_consulta.asp, line 181

essa parte do codigo é essa:

  Set objRS_usr = Server.CreateObject("ADODB.Recordset")
  objRS_usr.CursorType = 2
  objRS_usr.LockType = 1
  strQ_usr = "SELECT "&prefixo&"usr.usr_id, "&prefixo&"usr.usr_nome, "&prefixo&"ano.ano_id_usr FROM "&prefixo&"usr, "&prefixo&"ano WHERE "&prefixo&"ano.ano_id_usr = "&prefixo&"usr.usr_id AND "&prefixo&"ano.ano_id = '" & objrs_ano("ano_id") &"'" 'linha 181
  objRS_usr.Open strQ_usr, objCon, , , &H0001

se alguém puder me ajudar eu agradeço

[fantasma]

qual é a linha 181

[crucifier]

 strQ_usr = "SELECT "&prefixo&"usr.usr_id, "&prefixo&"usr.usr_nome, "&prefixo&"ano.ano_id_usr FROM "&prefixo&"usr, "&prefixo&"ano WHERE "&prefixo&"ano.ano_id_usr = "&prefixo&"usr.usr_id AND "&prefixo&"ano.ano_id = '" & objrs_ano("ano_id") &"'" 'linha 181 

[crucifier]

descobri o erro mas não descobri uma solucao

o erro esta aih:

"&prefixo&"ano.ano_id = '"&objrs_ano("ano_id")&"'"

se eu colocar assim por exemplo funciona:

"&prefixo&"ano.ano_id = '1'"

mas eu preciso que ele puxe o eskema da linha...coméki arruma isso?o.O

[Jony Walker]

Sempre q continuar a mesma linha de código pra linha de baixo, repita o nome da var:

sql = " SELECT * FROM "

sql = sql & "tabela WHERE"

sql = sql & " id = 5"

[crucifier]

não adiantou não

e otra..

eu não pressionei enter nem nada pra i pra linha debaxo...ta com kebra automatica de linha por isso ela desceu xP

[crucifier]

valeu galera...abracei ele con o CInt e deu certo...=]]