Números Fracionários

[fertel]

bom...

Como pegar este valor:

0,8333333333333333333333

e colocar apenas como 0,83 e ainda ser número, ou seja, não ser interpretado como string?

Obrigado

[dark0]

experimente usar a função ROUND do Vbscript.

round(valor)

[fertel]

Deu zero!

Mais alguma sugestão?

[danyort]

FormatNumber(numero, 2)

tenta esse... comigo funciona!

[quintelab]

Não sei se é bem isso que você quer, se você quiser arrendondar não será, mas pra mostrar somente o valor: 0,83. Da certo!!

Dim vteste, vresultado

vteste = "0,8333333333333333333333"

vresultado = mid(vteste, 1, 4)

[fertel]

Obrigado a todos.

Fiz assim e consegui o que eu queria:

<%
JUROS = "0,83333333333333333333333333333" '(AUTOMÁTICO ESSA PRAGA)
JUROS = Replace(FormatCurrency(Request.Form("JUROS")),"R$ ","")
%>

[dark0]

hehe

beleza.. funcionou..

mas só pra deixar dito..

O FormatCurrency pega as configurações de moeda do Servidor.

então, se você rodar em um servidor que esteja nos EUA, por exemplo, ele pode pirar.

Abraço

[bareta]

funçãozinha quebra galho

[Decio]

...e colocar apenas como 0,83 e ainda ser número, ou seja, não ser interpretado como string?

Nada impede de se trabalhar com string e valores monetarios, visto a facilidade de conversão de tipos que o VB proporciona:

Dim lVar 'Currency
Dim sVar ' String
 sVar = "0,833333333333333333333333333333333333"
 lVar = CCur(Format(sVar, "##,##0.00"))
Response.Write  lVar