Håller på att göra ett program för löneberäknig, med OB tillägg, övertid mm. Din avrundning blir inte korrekt.Valutaberäkning
MEN då jag försöker räkna fram de enskilda beloppen hamnar jag fel
inte stora fel med det skiljer trots allt ETT öre per timme,
Vaffö då då??
Dim lon, beraknadlon
'detta kommer från ett formulär
lon = Request.Form("txtLon")
'här räknar jag fram hur stor den beräkningsbara lönen blir
beraknadlon=lon/0.97476
'här räknas fram ett av OB tilläggen
art411237 = beraknadlon/237
'här visar sig felet, jag får ett öre för lite
= FormatNumber(art411237)Sv: Valutaberäkning
När du använder dig av funktionen FormatNumber utan argument för hur många decimaler som ska visas (FormatNumber(lon,4) visas 4 decimaler) använder sig FormatNumber av maskinens egna inställningar vilket i en std installation endast är 2 decimaler.
en sak till. Det är valuta du räknar med så kanske funktionen FormatCurrency är bättre att använda sig av ....
cya,
PatrikB