<%
estrazioni=5 'numero di estrazioni volute
massimo=10 'intervallo
dim numeri
redim numeri(estrazioni)
trovati=0
while trovati<estrazioni
randomize
x=int(rnd*massimo+1)
nuovo=true
for k=1 to trovati
if x=numeri(k-1) then nuovo=false
next
if nuovo then
numeri(trovati)=x
trovati=trovati+1
end if
wend

for i=1 to estrazioni
response.write numeri(i-1) & "<br>"
next

%>

Traspi.net
Da Torino al mondo Internet il magazine di cultura, creatività e informazione.
www.traspi.net
Mauro Tortone
webmaster@traspi.net

differenza?
non mi è chiaro... non ho ancora capito bene come asp genera i numeri (ogni guida me lo dice in maniera diversa...). Grazie

ps. dalla guida vbscript dice
Randomize uses number to initialize the Rnd function's random-number generator, giving it a new seed value. If you omit number, the value returned by the system timer is used as the new seed value.

poi però dice
Note To repeat sequences of random numbers, call Rnd with a negative argument immediately before using Randomize with a numeric argument. Using Randomize with the same value for number does not repeat the previous sequence.

bah se mi chiarisci le idee mi fai una cortesia

Traspi.net
Da Torino al mondo Internet il magazine di cultura, creatività e informazione.
www.traspi.net
Mauro Tortone
webmaster@traspi.net

Modificato - ueilat - 26 Set 2001 14:37:02