konverteing fra tal til bogstaver

VarInt=request("MitTal")

SELECT CASE VarInt
Case "1" VarStr="aaaaa"
Case "2" VarStr="aaaab"
Case "3" VarStr="aaaac"
.... o.s.v.
Case "28" VarStr="aaabc"
END SELECT

Response.Write(VarStr)


/s

Her er en funktion:

function IntToLInt(Value)
  I1 = (Value \ 456976)
  Value = Value - I1 * 456976
  I2 = (Value \ 17576)
  Value = Value - I2 * 17576
  I3 = (Value \ 676)
  Value = Value - I3 * 676
  I4 = (Value \ 26)
  Value = Value - I4 * 26
  I5 = Value
  IntToLInt = Chr(97 + I1) & Chr(97 + I2) & Chr(97 + I3) & Chr(97 + I4) & Chr(97 + I5)
end function

raagaard... ok... regnede simpelthen ikk med at der ville være en som foreslog dette....

tror ikke du skal regne med pointsne!  :-))

og så den simple metode:

For i = 1 To 5
  s = Chr(97 + tal Mod 26) & s
  tal = (tal - tal Mod 26) / 25
Next

/Bodekaer
www.bodekaer.dk // www.smartlaunch.net

... som var et svar

sorry  :o)