Código fuente de 'Generador-de-claves.asp'
<html>
<head>
<title>Generador de claves - Códigos asp, programacion asp, descargas asp, rutinas asp</title>
</head>
<p align="center"><b><font size="3">Generador de claves</font></b></p>
<body style="font-family: Arial; font-size: 11pt">
Este es un ejemplo de cómo generar contraseñas aleatorias (utiliza números y
letras mayúsculas y minúsculas):<br>
<br>
Ejemplo:
<% 'Código ASP
genPassword = ""
Randomize
For i = 1 to 8
intNum = Int(10 * Rnd + 48)
intUpper = Int(26 * Rnd + 65)
intLower = Int(26 * Rnd + 97)
intRand = Int(3 * Rnd + 1)
Select Case intRand
Case 1
strPartPass = Chr(intNum)
Case 2
strPartPass = Chr(intUpper)
Case 3
strPartPass = Chr(intLower)
End Select
genPassword = genPassword & strPartPass
Next
response.write(genPassword & "<br>")
'Fin código ASP %>
<br>
<p><a href="Generador%20de%20claves.asp">Actualiza la página para obtener otra
contraseña aleatoria</a></p>
</body>
</html>