Vi posto il codice, poi le due domandine.....

codice:
Dim i
i=1
For i=1 to 1000

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
a = chr(n)
anmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
b = chr(n)
bnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
c = chr(n)
cnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
d = chr(n)
dnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
e = chr(n)
enmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
f = chr(n)
fnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
g = chr(n)
gnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
h = chr(n)
hnmro = n

do
Randomize
n = int(rnd * 75) + 48
loop until ((n >= 48) AND (N <= 57)) OR ((N >= 97) AND (N <= 122))
j = chr(n)
jnmro = n

contr1=int((anmro+dnmro+gnmro)/3)
contrcar1=97
for ciclo1=0 to contr1
if contrcar1>121 then
contrcar1=97
end if
contrcar1=contrcar1+1
next
contrcar1=chr(contrcar1)

contr2=int((bnmro+enmro+hnmro)/3)
contrcar2=97
for ciclo2=0 to contr2
if contrcar2>121 then
contrcar2=97
end if
contrcar2=contrcar2+1
next
contrcar2=chr(contrcar2)

contr3=int((cnmro+fnmro+jnmro)/3)
contrcar3=97
for ciclo3=0 to contr3
if contrcar3>121 then
contrcar3=97
end if
contrcar3=contrcar3+1
next
contrcar3=chr(contrcar3)

response.write(a & b & c & d & e & f & g & h & j & contrcar1 & contrcar2 & contrcar3 & "
")
Next
Domanda/osservazione num.1:
Credo di averlo scritto un po' cervellotico, si può snellire, mantenendo comunque le stesse caratteristiche? (devo comunque tenere separati i valori delle singole cifre, riconoscendole come a,b,c,d, ecc., dite che mi converrebbe fare uno split? Però non sono molto brava in questo!!!!)

Domanda/osservazione num.2:
Ho provato a generare questi 1000 codici, ma nonostante la statistica mi dica che con 9 cifre casuali ed un range di 37 posizioni (lettere minuscole + numeri) io abbia 129.961.739.795.077 combinazioni possibili (37 alla 9^, giusto?), sono usciti 2 codici uguali!!!!!!
C'è qualcosa di sbagliato nel mio codice? C'è un modo per evitarlo? Considerate che probabilmente di codici dovro' generarne 500.000!!!!
VVoVe:

Grasssss'