function lavPassword(antal) tilladtkarakter = "abcdefghijklmnopqrstuvwxyz1234567890" str = "" randomize for i = 1 to antal index = Int(rnd * len(tilladtkarakter))+1 str = str & Mid(tilladtkarakter,index,1) next lavPassword = str end function
function lavPassword(antal) tilladtkarakter = "1234567890abcdefghijklmnopqrstuvxyzæøåABCDEFGHIJKLMNOPQRSTYVXYZÆØÅ" str = "" for i = 1 to antal randomize index = Int(rnd * len(tilladtkarakter))+1 str = str & Mid(tilladtkarakter,index,1) next lavPassword = str end function
Hvis det er til et password felt som gennes i Access database er der ingen forskel på store og små bogstaver.. Men du retter bare i variablen tilladtkarakter for dem du vil havde med.
Synes godt om
Slettet bruger
23. september 2003 - 15:32#5
Hvem får pointene i sådan et tilfælde :o) Vi deler 50/50....
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.