[Resolvido] Soma

[Web 1 0]

Pessoal estou tentando fazer uma soma porem o resultado correto seria 37,60 e esta exibindo 38,00

 

<%
Set RSvalor = Conn.Execute("SELECT Sum(ServValor) as Contador FROM servico where ServClienteId="& cint(categ) &"")
%>


      <%ValorServicos = cint(RSvalor("Contador"))
ValorBoleto = cint("2,70")
ValorTotal = ValorServicos + ValorBoleto
%>

   R$ <%=FormatNumber(RSvalor("Contador"))%> + R$ 2,70 =  <%=FormatNumber(ValorTotal)%>

[Vinicius Ianni 189]

Retire o Cint e use FormatNumber

[Eduardo Fagnoni 0]

No lugar do cint coloque cdbl que suporta casas decimais.

O cint está transformando o número em inteiro e arredondando o resultado.

[Web 1 0]

estou usando MYSQL interfere em algo?

 

Deixei assim

 <%ValorServicos = FormatNumber(RSvalor("Contador"))
       ValorBoleto = FormatNumber("2,70")
       ValorTotal = ValorServicos + ValorBoleto
       %>

   R$ <%=ValorServicos%> + R$ 2,70 =  <%=(ValorTotal)%>

 

Esta exibindo assim 34,90 + R$ 2,70 = 34,902,70

[Eduardo Fagnoni 0]

estou usando MYSQL interfere em algo?

 

 

Deixei assim

 <%ValorServicos = FormatNumber(RSvalor("Contador"))
       ValorBoleto = FormatNumber("2,70")
       ValorTotal = ValorServicos + ValorBoleto
       %>

   R$ <%=ValorServicos%> + R$ 2,70 =  <%=(ValorTotal)%>

 

Esta exibindo assim 34,90 + R$ 2,70 = 34,902,70

 

 

 

Isso aconteceu porque o FormatNumber só mostrou a string com o Formato Número, mais ela continuou sendo uma STRING.

 

Deixa assim:

 

<%
ValorServicos = Cdbl(RSvalor("Contador"))
ValorBoleto = Cdbl("2,70")
ValorTotal = ValorServicos + ValorBoleto


response.write(FormatCurrency(ValorServicos)&"+"&FormatCurrency(ValorBoleto)&"="&FormatCurrency(ValorTotal))
%>

[Web 1 0]

Certinho Eduardo obrigado! Valeu!