7 svar · 565 visningar · startad av Addeladde
Hur formaterar man ett tal från en databas så att det ser ut så här
1 100 kr
12 233 kr
Med formatNumer och formatCurrency får ma decimaler. Jag har för mig att det ska gå att ta bort dem på något sätt.
pris = 10100023
strPris = formatCurrency(pris)
strpris = Replace(strPris,","," ")
strpris = Replace(strPris,"."," ")
Response.Write strPris
Det ska väl funka 
Om det ser ut så här då
<%=RS( "produkt_pris" )%>
Kan man inte göra en egen funktion "formateraPris" som man sedan kan använda.
<%=formateraPris(RS( "produkt_pris" ))%>
Jag försökte gjorde en funktion efter icaaq förslag. men den tar inte bort decimalerna
Alltså
3 490,00 kr
ska se ut på detta sätt
3 490 kr
Function Valuta(strPris)
strPris = formatNumber(Trim(strPris))
strpris = Replace(strPris,","," ")
strpris = Replace(strPris,"."," ")
Valuta = strpris
End Function
Jag lyckades lösa det så här
Function Valuta(strPris)
strPris = formatNumber(strPris,0)
strpris = Replace(strPris,","," ")
strpris = Replace(strPris,"."," ")
Valuta = strpris
End Function
Function Valuta(strPris)
strPris = formatCurrency(Trim(strPris))
strpris = Replace(strPris,","," ")
strpris = Replace(strPris,"."," ")
Valuta = strpris
End Function
Response.Write Valuta(strPris)
eller så här
1. Skaffa VBScript-dokumentationen
2. Läs om formatcurrency
3. Skriv <%=formatCurrency(RS( "produkt_pris" ),0)%>
Men, med:
formatNumber(strPris,0)
får man aldrig några decimaler, dvs. man behöver aldrig ersätta . eller ,
[emission var före...]
/T
