<%
'**********************************
'Función: Generador (Longitud)
'Parámetros: longitud, valor de longitud arbitraria, número de dígitos de código aleatorio
'Autor: Alixi
'Fecha: 2007/7/15
'Descripción: Genere funciones de código aleatorio de cualquier inglés + dígito de longitud
'Ejemplo: Generador (80)
'**********************************
FunctionGenerator (longitud)
Dimi, temperatura
temps = "abcdefghijklmnopqrstuvwxyz1234567890"
Generador = ""
Ifisnumérico (longitud) = falsethen
Extinción
Endif
Fori = 1Tolgentil
Aleatorizar
Generador = generador & mid (temps, int ((len (temps)*rnd) +1), 1)
Próximo
Función final
%>