Ik heb een reeks aantal valutavelden in een acces 97 database, maar als ik deze in een html wilt vertonen geeft hij niet altijd 2 decimalen achter de komma. Als ik de databse opent, dan zie ik bijv. staan € 19,00. Maar als ik die zelfde waarde wilt vertonen in m'n html dan komt er alleen 19 te staan, i.p.v. 19,00. Ik heb dit probleem opgelost met:
Maar er moet toch wel een MAKKELIJKERE manier zijn? Ik heb de veldeigenschappen in acces 97 al op "2" decimalen gezet, maar dit werkte helaas niet! Hij vertoont ze alleen netjes in acces 97 zelf!
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| txtWinstVerliesSplit = Split(txtWinstVerlies, ",")
if UBound(txtWinstVerliesSplit) = 0 then
txtWinstVerlies = txtWinstVerlies & ".00"
end if
if UBound(txtWinstVerliesSplit) = 1 then
txtWinstVerliesVoor = txtWinstVerliesSplit(0)
txtWinstVerliesNa = txtWinstVerliesSplit(1)
if Len(txtWinstVerliesNa) = 0 then
txtWinstVerlies = txtWinstVerliesVoor & ".00"
end if
if Len(txtWinstVerliesNa) = 1 then
txtWinstVerlies = txtWinstVerliesVoor & "," & txtWinstVerliesNa & "0"
end if
if Len(txtWinstVerliesNa) = 2 then
txtWinstVerlies = txtWinstVerliesVoor & "," & txtWinstVerliesNa
end if
if Len(txtWinstVerliesNa) = 3 then
Error = 1
Errors = "&ErrorWinstVerlies=1" & Errors
end if
end if |
Maar er moet toch wel een MAKKELIJKERE manier zijn? Ik heb de veldeigenschappen in acces 97 al op "2" decimalen gezet, maar dit werkte helaas niet! Hij vertoont ze alleen netjes in acces 97 zelf!