Tipo de dados imcompatível na expressão de critério

[webfuture 0]

Olá galera, estou instalando um site em asp e access e esta rolando um erro aqui, o erro é o seguinte:

 

Tipo de erro:

Microsoft JET Database Engine (0x80040E07)

Tipo de dados imcompatível na expressão de critério.

/site.com.br/access/index.asp, line 360

 

Olhem o código:

 

<TABLE CELLSPACING="0" CELLPADDING="0" WIDTH="100%" BORDER="0"><%Set RSListaNoticias = Server.CreateObject("AdoDB.Recordset")RSListaNoticias.open "Select top 3 controle, titulo, texto from TB_Noticias WHERE categoria = '11' order by data desc", conexaoSQLwhile not RSListaNoticias.EOFid = RSListaNoticias.Fields("controle")titulo = RSListaNoticias.Fields("titulo")texto = RSListaNoticias.Fields("texto")%><TR><TD CLASS="FORMATO1" VALIGN="TOP"><DIV ALIGN="JUSTIFY"><A HREF="noticias_mostra.asp?id=<%Response.Write id%>" CLASS="AZUL"><B><%Response.Write trim(titulo)%></B></A></TD></TR><TR><TD HEIGHT="5"></TD></TR><TR><tD CLASS="FORMATO1"><A HREF="noticias_mostra.asp?id=<%Response.Write id%>" CLASS="PRETO"><%Response.WRite trim(left(texto, 140))%></A>... » <A HREF="noticias_mostra.asp?id=<%Response.Write id%>" CLASS="AZUL">leia mais</A></DIV></TD></TR><TR><TD HEIGHT="14" COLSPAN="2" CLASS="FORMATO1"><HR NOSHADE COLOR="#C0C0C0" WIDTH="100%"></TD></TR><%RSListaNoticias.movenextwendRSListaNoticias.closeset RSListaNoticias = nothing%><TR><TD HEIGHT="14" COLSPAN="2" ALIGN="RIGHT"><A HREF="http://www.bastaclicar.com.br/musica/noticias_lista.asp?PagAtual=1" CLASS="AZUL"><B>Veja todas notícias</B></A></TD></TR></TABLE>

Estranho que seu eu tiro o = '11' ele funciona, provavelmente pela forma de tratar os dados no where, mas não sei o que colocar no lugar para funcionar...rs

 

Se alguem puder me ajudar,

 

WebFuture

 

Por incrivel que pareça consegui resolver...rs.

 

Depois que postei veio a idéia, troquei o WHERE CATEGORIA = '11' POR WHERE CATEGORIA = "& categoria &" e declarei a categoria como categoria = "11" antes do select, ai funcionou, agora, isto e o mais correto?

 

WebFuture

[shumi 0]

Depois que postei veio a idéia, troquei o WHERE CATEGORIA = '11' POR WHERE CATEGORIA = "& categoria &" e declarei a categoria como categoria = "11" antes do select, ai funcionou, agora, isto e o mais correto?

eu faço isso que falou acima!Mas se quiser direto tente assim:

Set RSListaNoticias = Server.CreateObject("AdoDB.Recordset")RSListaNoticias.open "Select top 3 controle, titulo, texto from TB_Noticias WHERE categoria="&"11"&" order by data desc"

Abraços

[webfuture 0]

Olá shumi, valeu pela dica, em alguns casos resolveu fazer assim também, porém em um outro caso que geralmente usa-se este selectRSListaFilmesEmbreve.open "Select nome_genero, controle, titulo_original, titulo_portugues, id_genero, ano_producao, data_breve from TB_Filmes AS F, TB_Generos as G where tipo = "&" 2 "&" and f.id_genero = g.id and f.controle <> "& id_filme_destaque &" ORDER BY DATA_CADASTRO DESC ", conexaoSQLEle da o erro:Tipo de dados imcompatível na expressão de critério.Tem algo a ser modificado neste SQL para funcionar com access ou terei de fazer varios recordsets para pegar informacoes de tabelas ao inves de pegar tudo emum só ?WebFuture

[jothaz 1]

Olá shumi, valeu pela dica, em alguns casos resolveu fazer assim também, porém em um outro caso que geralmente usa-se este select

 

RSListaFilmesEmbreve.open "Select nome_genero, controle, titulo_original, titulo_portugues, id_genero, ano_producao, data_breve from TB_Filmes AS F, TB_Generos as G where tipo = "&" 2 "&" and f.id_genero = g.id and f.controle <> "& id_filme_destaque &" ORDER BY DATA_CADASTRO DESC ", conexaoSQL

 

Ele da o erro:

 

Tipo de dados imcompatível na expressão de critério.

 

Tem algo a ser modificado neste SQL para funcionar com access ou terei de fazer varios recordsets para pegar informacoes de tabelas ao inves de pegar tudo emum só ?

 

WebFuture

Provavelmente existe algo incompatibilidade de tipo de dado na expressão abaixo:

where tipo = "&" 2 "&" and f.id_genero = g.id and f.controle <> "& id_filme_destaque &" ORDER BY DATA_CADASTRO DESC "

Verifique se os campo tipo ou f.controle são do tipo numérico caso contrário, o campo seja caracter coloque o ' para delimitar os campos.

 

t+