Erro Ao Consultar Em Campo Moeda No Access

[golbranco]

eae galera to com um probleminha aqui no em fazer uma consulta... em um campo moeda

sql = "SELECT tb_produtos.*, tb_categorias.*, tb_precos.* FROM tb_produtos, tb_categorias, tb_precos WHERE tb_produtos.nuCategoria = tb_categorias.nuCategoria AND tb_precos.codProduto = tb_produtos.codProduto AND preço BETWEEN '"&valor1&"' AND '"&valor2&"' "

tipo ele não busca... tá dando erro na hora de buscar no campo preço porque?

olha o erro

SELECT tb_produtos.*, tb_categorias.*, tb_precos.* FROM tb_produtos, tb_categorias, tb_precos WHERE tb_precos.vl1_50 BETWEEN 'R$ 0,50' AND 'R$ 50,00' ORDER BY nuProduto desc, tb_produtos.codProduto asc

Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/2005/includes/ProdutosPesquisa.asp, line 59

[Graymalkin]

O tipo moeda é numérico, portanto você deveria passar 50.00 ao invés de R$ 50,00.

Abraços,

Graymalkin

[fertel]

Não sei se ajuda, mas para os mais iniciantes, aconselho usar sempre campo texto no banco de dados. Sempre vai gravar valores assim:

"55,00"

"1230,00"

etc... Sem as aspas evidentemente.

Na hora de exibir:

VALOR = "55,00" '< Sim, isso é uma string
Response.Write FormatCurrency(VALOR)

Supondo que queira somar valores:

VALOR1 = "55,00"
VALOR2 = "100,00"

VALOR_TOTAL = FormatCurrency(VALOR1 + VALOR2)

supondo que tenhamos o valor com "R$ " e quero gravar no banco de dados sem o R$:

VALOR = "R$ 125,00"
VALOR_NOVO = Replace(VALOR, "R$ ", "")' < Observe que após o R$ tem mesmo um espaço

Assim com certeza foge dos clássicos erros com moedas.

Espero ter sido útil.