2 decimali

[allejo]

ciao
ho bisogno di 2 decimali anche così 1500,00 (anche con 2 zeri)
Faccio così

Math.round(calcola*100)/100 però ignora gli zeri
come mai?

[msalvador]

Function VBSRetriveDecimal
VBSRetriveDecimal = mid(FormatNumber(1,1),2,1)
end Function

Function VBSRetriveGroupDigit
VBSRetriveGroupDigit = mid(FormatNumber(1000),2,1)
end Function

Function VBSFormatMyNumber(MyNumber,NOfDigits)
MyNumber =cstr(FormatNumber(MyNumber,NOfDigits))
StrMyNumber = Replace(cstr(MyNumber), VBSRetriveDecimal , Request("GroupDecimal") , 1, 1, 1)
LeftMyNumber = Right(StrMyNumber,NOfDigits + 1)
StrMyNumber = Left(cstr(MyNumber),len(StrMyNumber)-(NOfDigits+1))
StrMyNumber = Replace(StrMyNumber, VBSRetriveGroupDigit, Request("GroupDigit")) + LeftMyNumber
VBSFormatMyNumber = StrMyNumber
end Function

[allejo]

Ma io palro di javascript e non di visual basic

[msalvador]

se hai l'msdn puoi convertirla

[allejo]

peccato non ho l'msdn......

Chiedo se puoi convertirla?

[msalvador]

non riesci a chiamare la funzione con vbscript.
Non ho il tempo di convertirtela

[br1]

http://forum.html.it/forum/showthrea...hreadid=719586

ciao

[allejo]

Grazie mille br1.......