Erro De Principiante

[hellxande]

Boa Noite a Todos.

Galera, com certeza este deve ser mais um erro de principiante q cometo, porém não estou sabendo resolver.

Tenho uma Área Administrativa no Site q estou montando, onde o Usuário pode fazer as alterações necessárias dos registros desejados.

Meu problema começa na questão de alteração de campos de valores, se rodo com valores redondos exemplo 100,00 funciona perfeitamente, porém se rodo com valores quebrados exemplo 100,10 me acusa o erro abaixo:

Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/adm/AlteraServicoSucesso.asp, line 33

Segue o Código q estou utilizando:

Session.LCID = 1046
NomeEmpresa=Request.Form("Nome") ' Campo Texto
ComboOrigem=Request.Form("Combo") ' Campo Texto
ComboDestino=Request.Form("Combo2") ' Campo Texto
preço=Request.Form("preço") ' Campo Unidade Monetária
ComboEmpresaAerea=Request.Form("ComboEmpresaAerea") ' Campo Texto

sql="update EmpresaAerea set EmpresaAereaNome='"&NomeEmpresa&"', EmpresaAereaOrigem='"&ComboOrigem&"', EmpresaAereaDestino='"&ComboDestino&"', EmpresaAereaPreco='"&preço&"', EmpresaAereaModalidade='"&ComboEmpresaAerea&"' where EmpresaAereaID="&request.querystring("Cod")&""
db.execute(sql)
db.close
set db=NOTHING

Desde já agradeço a ajuda, pois qualquer sugestão é bem vinda.

Atenciosamente

Hellxande

Editado Setembro 13, 2007 por hellxande

[bareta]

certifique-se de que o campo valor esteja como moeda ou numero no banco... e use

EmpresaAereaPreco="&preço&",

[hellxande]

Prezado Bareta

Obrigado pela sugestão.

No Banco de Dados o campo relacionado ao Preço esta como Unidade Monetária, com Casas Decimais automáticas.

Sobre a alteração q você sugeriu quando retiro as Aspas Simples deixando assim

EmpresaAereaPreco="&preço&"

ele me retorna o seguinte:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe (operador faltando) na expressão de consulta 'R$ 250'.

/metasfull/adm/AlteraEmpresaAereaSucesso.asp, line 33

Ou seja me retorna junto com o erro o valor redondo, apesar de eu ter informado R$ 250,10 ( isto usando Virgula ), usando Ponto, tb me retorna o mesmo erro porém com o valor informado R$ 250.10.

Esta linha 33 refere-se justamente ao Update

Atenciosamente

Hellxande

[Gnomo]

Sugiro que você coloque esse campo como texto normal, e use uma

mascara para adicionar as virgulas de acordo com o numero. Eu nunca

usei campos com unidade monetaria aehoaheoihaoie...

Valeu!!

[Guest --Alexandre --]

Cara tenta coloca assim o codigo

sql = "update EmpresaAerea set "

sql = sql & "EmpresaAereaNome = '"&NomeEmpresa&"', "

sql = sql & "EmpresaAereaOrigem = '"&BomboOrigem&"', "

sql = sql & "EmpresaAereaDestino = '"&ComboDestino&"', "

sql = sql & "EmpresaAereaPreco = '"&preço&"', "

sql = sql & "EmpresaAereaModalidade = '"&ComboEmpresaAerea&"', "

sql = sql & "where EmpresaAereaID = " & Request.QueryString("Cod")

[Guest --Alexandre --]

Cara tenta coloca assim o codigo

sql = "update EmpresaAerea set "

sql = sql & "EmpresaAereaNome = '"&NomeEmpresa&"', "

sql = sql & "EmpresaAereaOrigem = '"&BomboOrigem&"', "

sql = sql & "EmpresaAereaDestino = '"&ComboDestino&"', "

sql = sql & "EmpresaAereaPreco = '"&preço&"', "

sql = sql & "EmpresaAereaModalidade = '"&ComboEmpresaAerea&"', "

sql = sql & "where EmpresaAereaID = " & Request.QueryString("Cod")

o erro tah dando na linha 33 não é?..e essa linha é justo a do sql = "update..."?