Ciao a tutti ,
all'interno di un ciclo do while ho messo un generatore di password casuali (numeri e lettere) :

Do While Not tsTextStream.AtEndOfStream

caratteri = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ/"
Randomize

Do Until len(password) = 10
carattere = Int((37 * Rnd) + 1)
password = password & Mid(caratteri,carattere,1)
Loop

response.write password

loop

Il codice normalmente funziona benissimo ma in questo caso per tutte le righe scrive la stessa password non va avanti... non riesco a vedere l'errore , potete aiutarmi per favore??

grazie