Código fuente de 'Numero-aleatorio.asp'
<html>
<head>
<title>Número aleatorio - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
<body style="font-family: Arial; font-size: 11pt">
<p align="center"><b><font face="Arial" size="3">Número aleatorio</font></p>
</b>
<br>
La función Rnd() se utiliza para buscar valores aleatorios al azar.
Requiere que en nuestro código pongamos la instrucción Randomize.
Ejemplo de número aleatorio (entre 1 y 25):
<%
Dim numero_azar
' Empezamos la función Ramdomize.
randomize
' Buscamos el numero entre 1 y 25.
numero_azar = Int(Rnd*25) + 1
'Imprimimos el número por pantalla.
response.write "<B>"& numero_azar &"</BR>"
%>
<br>
<br>
<a href="Número aleatorio.asp">Pulsa aquí para actualizar esta página y ver el siguiente número al azar</a>
</p>
</body>
</body>
</html>