Gianlu-thebest |
|
| Questa funzione permette di creare una stringa random. CITAZIONE Funzione _RandomString() Parametri ($iniziale = "a", $finale = "z", $maiuscolo = 0, $lunghezza = 6) Sono tutti opzionali Uso: _RandomString("a","s") Errori: Successo: Ritorna la stringa richiesta Errore: Ritorna -1 in caso di linghezza non valida Funzione: CODICE Func _RandomString($iniziale = "a", $finale = "z", $maiuscolo = 0, $lunghezza = 6) #cs Funzione _RandomString() Parametri ($iniziale = "a", $finale = "z", $maiuscolo = 0, $lunghezza = 6) Sono tutti opzionali Uso: _RandomString("a","s") Errori: Successo: Ritorna la stringa richiesta Errore: Ritorna -1 in caso di linghezza non valida #ce Local $string = "" For $i = 0 to $lunghezza $lettera=Random(Asc($iniziale),Asc($finale),1) $string = $string&Chr($lettera) Next If $maiuscolo = 1 Then $string=StringUpper($string) EndIf If $lunghezza = 0 Or $lunghezza > 10000 Then Return -1 Else Return $string EndIf EndFunc
|
| |