Function random_GenPass( nNoChars, sValidChars )Originariamente inviato da impennata
ciao
si può creare un numero random di 5 cifre, quindi da 1 a 99999?
grazie
Const szDefault = "0123456789"
Randomize
If sValidChars = "" Then
sValidChars = szDefault
End If
nLength = Len( sValidChars )
For nCount = 1 To nNoChars
nNumber = Int((nLength * Rnd) + 1)
sRet = sRet & Mid( sValidChars, nNumber, 1 )
Next
Password_GenPass = sRet
End Function
random = random_GenPass( 5, "" )
Prova cosi Ciao