<%
'***********************************
'Função: gerador (comprimento)
Parâmetros: comprimento, valor do comprimento arbitrário, número de dígitos de código aleatórios
'Autor: Alixi
Data: 2007/7/15
'Descrição: gerar funções de código aleatório de qualquer comprimento de inglês + dígito
'Exemplo: gerador (80)
'***********************************
FunctionGenerator (comprimento)
Dimi, Temps
temps = "abcdefghijklmnopqrststwxyz1234567890"
Gerador = ""
Ifisnumeric (comprimento) = falseten
Saída de saída
Endif
Fori = 1Tol comprimento
Randomizar
Gerador = gerador e médio (temps, int ((len (temps)*rnd) +1), 1)
Próximo
Função final
%>