Generare una stringa alfanumerica!

[chiccomusic86]

Ciao a tutti...
un tempo c'era su freeasp.html.it un bellissimo script che faceva generare una stringa casuale con la funzione randrom alfanumerica della lunghezza di "N" caratteri!
Navigando in questi giorni non l'ho più trovato!
Vorrei un'aiuto... devo generare una stringa alfanumerica casuale e non so come fare.....

Grazie mille

[willybit]

Function CodiceCasuale(lunghezza)
	strCasuale = ""
	caratteri = Split("0,1,2,3,4,5,6,7,8,9,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z",",")
	a=UBound(caratteri)
	for i=1 to lunghezza
		strCasuale = strCasuale & caratteri(Int((a + 1) *  Rnd))
	next
	CodiceCasuale = strCasuale
End Function

[chiccomusic86]

Grazie mille ma non riesco a farlo girare... nel senso che mi genera sempre la stessa stinga!
Io ho bisogno che sia casuale!

Un tempo ce n'era uno fantastico sul HTML.it di questo script ma non c'è più!!!!

Qualcuno riesce ad aiutarmi? anche modificando lo script qua sopra in modo che generi una stinga diversa ad ogni refresh!!!!

[santino83]

for i=1 to lunghezza
randomize
		strCasuale = strCasuale & caratteri(Int((a + 1) *  Rnd))
	next

[willybit]

Originariamente inviato da chiccomusic86
Grazie mille ma non riesco a farlo girare... nel senso che mi genera sempre la stessa stinga!
Io ho bisogno che sia casuale!

Un tempo ce n'era uno fantastico sul HTML.it di questo script ma non c'è più!!!!

Qualcuno riesce ad aiutarmi? anche modificando lo script qua sopra in modo che generi una stinga diversa ad ogni refresh!!!!

basta che usi randomize a inizio pagina

[chiccomusic86]

Grazie mille! ci provo... se ho bisogno posto!

Ciauzzzzz

[santino83]

il randomize nel for era una figata però