ASP: Gerando uma senha aleatória de forma simples
Canal: ASP | Autor: Alexandre de Luccia | Publicado em: 16/06/2009 | Views: 1.534Esta função pode ser usada para ter uma senha aleatória gerada automáticamente. Ela permite a especificação de caracteres válidos e também a quantidade de caracteres a ser utilizado. É uma função bem simples limpa e muito eficiente.
Qualquer dúvida entre em contato comigo deixando um comentário. Abraços!
<%
Function GeraSenha( nNoChars, sValidChars )
' nNoChars = comprimento da senha gerada
' sValidChars = Validando caracteres
' ( "" ) then
' Padrão para gerar senha: A-Z AND a-z AND 0-9
Const szDefault = "abcdefghijklmnopqrstuvxyzABCDEFGHIJKLMNOPQRSTUVXYZ0123456789"
Dim nCount
Dim sRet
Dim nNumber
Dim nLength
Randomize 'iniciando randomização
If sValidChars = "" Then
sValidChars = szDefault
End If
nLength = Len( sValidChars )
For nCount = 1 To nNoChars
nNumber = Int((nLength * Rnd) + 1)
sRet = sRet & Mid( sValidChars, nNumber, 1 )
Next
Password_GenPass = sRet
End Function
%>
<%
Response.Write "Senha A: " & GeraSenha( 10, "" )
%>
<%
Response.Write "<br>Senha B: " & GeraSenha( 5, "ABCabc" )
%>Qualquer dúvida entre em contato comigo deixando um comentário. Abraços!
Esta obra está licenciada sob uma Licença Creative Commons. Você pode copiar, distribuir, exibir, executar, desde que seja dado
crédito ao autor original (Citando nome do autor, data, local e link de onde tirou o texto). Você não pode fazer uso comercial desta obra.
Você não pode criar obras derivadas.
Vote no artigo:
Artigo anterior
Gráfico Dinâmico Utilizando XM.
Nesta coluna aprenderemos montar um Gr. Próximo artigo
ASP: Separando Caracteres de V.
Exemplo básico de como separar caracte.
Gráfico Dinâmico Utilizando XM.
Nesta coluna aprenderemos montar um Gr. Próximo artigo
ASP: Separando Caracteres de V.
Exemplo básico de como separar caracte.








