altså skal strUsername være 3 random tegn fra de tegn der findes i strName.
Den sidste ting er så, at scriptet også gerne må tjekke i tabellen [access], feltet [username] om strUsername findes i forvejen - hvis det gør skal der laves et nyt strUsername og dette tjekkes selvfølgelig også mod tabellen.
Hmmm, er det forståeligt? Er der nogen der kan hjælpe med det?
Dette burde gøre det. Jeg har også indbygget en sikkerheds funk så den kun søger 20 gange hvor efter den melder fejl, ellers kan du komme i et uendeligt loop hvis alle mulige navne er taget.
strName = "Test Navn" randomize FoundName = false for f=0 to 20 tmpName = "" for j=1 to 3 tmpName = tmpName & mid(strName,round(rnd()*(len(strName)-1))+1,1) next set rs=conn.Execute("select * from brugere where username='"& tmpName &"'") if rs.eof then FoundName = true exit for end if next if FoundName then 'fundet else 'ikke fundet end if
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.
