122233 skal blive til 1.222,33

Og hvad skal følgende blive til? :-)

111122223333

http://www.w3schools.com/vbScript/func_formatnumber.asp

1111222.233,33

Prøv at tage et kig på
http://msdn2.microsoft.com/en-us/library/ws343esk(VS.85).aspx

Hvis du har sat Session.LCID = 1033, så burde det formateres efter danske standarder

det skal lige siges at det ligger i et tekstfelt

Jeg har lavet en funktion, der ikke bruger computerens regionale indstillinger (",." vs ".,"):

function f(num)
dim one, two, three ' definer de variabler vi skal til at bruge
one = right(num, 2) ' hent kommatallene (2 tal fra højre side) = snup det efter ","
if len(num) > 2 then ' hvis der er mere end 2 tal, skal de resterende dele findes
    num = left(num, len(num) - 2) ' fjern kommatallene, da vi ikke længere skal bruge dem
    if len(num) < 3 then ' kontroller om antallet af de resterende tal er under 3 (så skal "." ikke bruges)
        two = num & "," ' snup det før ","
    else
        ' da der er mere end 3 tal tilbage, skal vi også finde det mellem "." og "," samt det før "."
        two = mid(num, len(num) - 2, 3) & "," ' snup det mellem "." og ","
        num = left(num, len(num) - 3) ' fjern tallene mellem "." og ",", da vi ikke længere skal bruge dem
        if len(num) > 0 then three = num & "." ' snup det før "."
    end if
end if
f = three & two & one ' returnet det i formattet "aaaaaaaaa.bbb,cc"
end function





' Eksempel med et tal i en variabel:
dim tal
tal = "122233"
response.write f(tal)

' Eksempel med tal fra et tekstfelt (name="tallet") via en form:
dim tal_fra_tekstfelt
tal_fra_tekstfelt = request.form("tallet")
response.write f(tal_fra_tekstfelt)

super, tak thesurfer. svar :-)

No problemo :-)

Koden er kommenteret, så du har en chance for at forstå hvad der sker..

Hvis du en dag finder ud af, at du vil bytte om på "." og ",", kan du bare gøre det på de steder hvor der står:

& "."
& ","

Thats it..