Tips > ASP
Slumpa fram lösenord
Många frågar hur man slumpar fram ett lösenord, detta kan lätt fixas med denna lilla bit kod:
Function CreatePassword(ByVal lngCnt)
Const strPassChars = "abcdefghijkmnpqrstuvwxyzABCDEFGHJKLMNPQRSTUVWXYZ23456789"
Randomize
CreatePassword = ""
Do while lngCnt > 0
CreatePassword = CreatePassword & Mid(strPassChars, Int(Rnd() * Len(strPassChars)) + 1, 1)
lngCnt = lngCnt - 1
Loop
End Function
För att sen ta ut det framslumpade lösnordet, ex i ett formulär eller liknande skriver du bara:
strPassord = CreatePassword(6)
Ändra 6an till det antal tecken du önskar slumpa fram.
Mvh Roosweb.se
Detta tips skapades 2008-02-09 17:08:05 av Roosweb. Det har lästs 501 gånger. ||
Kommentarer
LP_MAXI sa den 11 mars 2008 kl 13:19: Ser ut som detta tips är taget ifrån Guffas Arkiv.
http://guffa.com/Programming_archive.asp?id=25