Skab tilfældigt 9 cifret tal?

round(rnd*1000000000)

Jeg har brugt denne til at lave et tilføldig password, som altid er på 9 karakter/tal:

<%
function lavPassword(antal)
  tilladtkarakter = "1234567890"
  str = ""
  for i = 1 to antal
    randomize
    index = Int(rnd * len(tilladtkarakter))+1
    str = str & Mid(tilladtkarakter,index,1)
  next
  lavPassword = str
end function


Response.Write "Test : " & lavPassword(9)

Min er da nemmere!

Nej det kan du ikke sige...Det komme så sandelig an på hvad zeusdk har behov for. Det er ikke altid den nemmerste løsning er den rigtige.


For men din giver det et tal som ikke altid har 9 cifre..: den giver måske:
1
35
6546435
48

Min vil altid giver 9 cifre:
004837473
000000001
347583475


Så du kan ikke udtale dig om hvad der er bedst før vi har hørt fra zeusdk. Når du nu er startet så vil jeg forsætte. Din kan faktisk give et ti ciferet tal fordi du bruger round!!!!!! Den vil runde op og i enkelte tilfælde give 1000000000.

randomize
taeller = 8
st = "1234567890"
l = len(st)
for i = 0 to taeller   
      t = int(l*rnd) + 1
      strTest = strTest + (mid(st, t,1))
next
   
Response.Write strTest

ras2000 --> Manden skriver han vil have et 9-cifret tal. Dermed kan han jo ikke bruge din.