ce l'ho fatta!!!!

yahooo!!! anzi... gooooogle (per non fare pubblicità occulta)

ecco l'algoritmo... ovviamente dovete fare tanti cicli for nidificati a seconda di quanti caratteri volete la combinazione numerica

alfabeto="0,1,2,3,4,5,6,7,8,9"
myArray = split(alfabeto,",") 'memorizzo tutti i caratteri da utilizzare dentro la variabile myArray senza la virgola
for x = 0 to ubound(myArray) 'questo ciclo arriva fino alla fine dell'array
stringa=Trim(myArray(x))
response.write stringa & "
"
for z = 0 to ubound(myArray)
stringa1 = stringa & Trim(myArray(z))
response.write stringa1 & "
"
for y = 0 to ubound(myArray)
stringa2 = stringa1 & Trim(myArray(y))
response.write stringa2 & "
"
next
next
segna=""
next
%>

ammetto che non è il massimo... ma sembra essere abbastanza rapido e funzionale!