Mostrar Registros Aleatorios
Publicado por Santos Pairazamán (415 intervenciones) el 01/02/2003 20:01:04
Hola amigos estoy sacando registros al azar de acuerdo a un valor minimo y máximo resulta que realicé este código pero me salen repetidos.
i=0
do while i<=4
i=i+1
randomize
Aleatorio=CInt((maximo - minimo + 1) * Rnd + minimo)
'Aleatorio=Int((maximo * Rnd) + minimo)
test(i,0)=Aleatorio
test(i,1)=0
Response.write cstr(test(i,0)) + "<br>"
loop
rs.close
Espero su sugerencias
Gracias
i=0
do while i<=4
i=i+1
randomize
Aleatorio=CInt((maximo - minimo + 1) * Rnd + minimo)
'Aleatorio=Int((maximo * Rnd) + minimo)
test(i,0)=Aleatorio
test(i,1)=0
Response.write cstr(test(i,0)) + "<br>"
loop
rs.close
Espero su sugerencias
Gracias
Valora esta pregunta


0