|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: SENHA ALEATÓRIA ALFANUMÉRICA
|
 |
|
|
|
Postada em 2/10/2003 por ^HEAVY-METAL^
Gerador de senha alfanumérica, incluindo maíusculas/minúsculas. Resultado: Senha mais segura, pois possui complexidade.
<%
function gerarsenha(valores)
Dim chr,matriz(62),num
num = ""
chr = "abcdefghijklmnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
for x = 1 to 62
matriz(x) = CStr(mid(chr,x,1))
next
randomize
do while len(chave) < 8
num = matriz(int(62*rnd))
chave = chave + num
loop
gerarsenha = chave
end function
response.write(gerarsenha(8))
%>
T+,
|
|
|
|
|
