Ciao a tutti; ho questa funzione che genera un codice solo numerico.
Succede, però, che a volte questo codice genera una cifra a 10 numeri (normalmente è a 8 cifre) e quando la cifra è da 10 numeri lo script va in errore.

Ma non dovrebbero solo 5 i numeri di cui deve essere composta la cifra?:
codice:
Function genera(Max, Min, MaxChar) 
	Dim codice, cifra
	For i = 1 To MaxChar 
		Randomize timer
		codice = Int((Max * Rnd()) + 1) 
		cifra = cifra & codice
	Next 
	genera = cifra
End Function 

temp_file = lcase(genera(91, 48, 5)) '5 = numero caratteri di cui è composta
:master: