Red de conocimiento informático - Conocimiento de la instalación - Solicitud para escribir un fragmento de código ASP para generar instantáneamente un número entre 600 y 700 ¡Gracias!

Solicitud para escribir un fragmento de código ASP para generar instantáneamente un número entre 600 y 700 ¡Gracias!

La siguiente función puede generar N números aleatorios únicos dentro del rango que especifique

<

Función RndNumber(MaxNum,MinNum)

Aleatorio

p >

RndNumber=int((MaxNum- MinNum+1)*rnd+MinNum)

RndNumber=RndNumber

Función final

Función RndN( N a,b) 'Generar un número aleatorio, a,b) 'Generar una cadena aleatoria no repetitiva de longitud N, a es el valor mínimo, b es el valor máximo

ejecutar ("dim shu). ( "&N&")")

flag=false

i=0

mientras(i

x = RndNumber(b,a)

j=0

while(j<.i)

si shu(j)=x entonces flag=true

j=j+1

wend

si no marca entonces

shu(i)=x

i = i+1

else

flag=false

finalizar si

wend

RndN=join( shu ,",")

función final

respuesta.Escribir RndN(9,600,700)

%>