Jump to content


Photo

Comparação Com Campo Moeda Em Access E Asp


  • Faça o login para participar
3 replies to this topic

#1 Alessandro Silva

Alessandro Silva

    Novato no fórum

  • Usuários
  • 2 posts
  • Sexo:Não informado

Posted 21/08/2009, 09:38

Pessoal, gostaria da ajuda de vocês para um probleminha que ja estou perdendo a cabeça e não consigo resolver.

Estou remodelando o site de uma imobiliaria e no painel de Busca por Imovel tem um campo Input no formulario de busca que estou precisando usar o conteudo dele na camparação com o que tenho armazenado no campo Valor de um banco de dados em Access e esta dando Erro de Tipo de Dado Incompativel e precisava da ajuda de você... é mais ou menos isso aqui:

If Request.Form("txt_valor") <> ":: INDIFERENTE ::" Then
Session("v_valor") = Request.Form("txt_valor")
End If

Comando = "Select * FROM imoveis Where valor <= '"& Session("v_valor") &"' Order By valor asc "
Set RecSet = DB.Execute(Comando)


OBS_1: Na tabela de Access o campo Valor esta no formato Moeda.

Tentei colocar o campo no access, do tipo Texto ou Numero mas na hora de ordenar crescente ou descrescente, não dá muito certo. O micro começa ordenando pelo primeiro digito, então fica tipo assim:

10
200
35
450
59

OBS_2: O campo Input do formulario está configurado para a digitação do usuario já ficar com pontuação, então o valor chega na página ASP com pontos e virgulas. Ex. 1.523,00

alguém pode me dar uma forcinha ai ?

valeu galera.

#2 DeeK

DeeK

    Normal

  • Usuários
  • 63 posts
  • Sexo:Masculino

Posted 21/08/2009, 16:06

Converta em String
Dim Valor
Valor = Request.Form("txt_valor")

If Cstr(Valor)  <>  ":: INDIFERENTE ::" Then
Session("v_valor") = Cstr(Valor)
End If


#3 nvivo

nvivo
  • Visitantes

Posted 23/08/2009, 15:18


Edição feita por: nvivo, 24/09/2009, 22:17.


#4 Alessandro Silva

Alessandro Silva

    Novato no fórum

  • Usuários
  • 2 posts
  • Sexo:Não informado

Posted 24/08/2009, 11:24

Muito obrigado pela excelente e completa explicação nvivo,

Fiz aqui e agora está tudo certinho, funcionou beleza...

valeu pela ajuda. :D




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq