Criando uma senha alfanumérica aleatória


Autor/fonte: Cláudio Hickstein



Digg del.icio.us

Esta é uma função que muitas pessoas estavam me perguntando como poderia fazer. Para você criar um tipo de senha aleatória existe muitos modos, portanto vou explicar uma das maneiras.

Arquivo gerador.asp:

<%
' Em primeiro lugar vamos criar uma função chamada GerarChave()
' esta função ira criar e definir um array alfanumérico de
' 0 a 9 e A a Z.


Function GerarChave(valores)

Dim chr_Array(35)

chr_array(0) = "0"
chr_array(1) = "1"
chr_array(2) = "2"
chr_array(3) = "3"
chr_array(4) = "4"
chr_array(5) = "5"
chr_array(6) = "6"
chr_array(7) = "7"
chr_array(8) = "8"
chr_array(9) = "9"
chr_array(10) = "A"
chr_array(11) = "B"
chr_array(12) = "C"
chr_array(13) = "D"
chr_array(14) = "E"
chr_array(15) = "F"
chr_array(16) = "G"
chr_array(17) = "H"
chr_array(18) = "I"
chr_array(19) = "J"
chr_array(20) = "K"
chr_array(21) = "L"
chr_array(22) = "M"
chr_array(23) = "N"
chr_array(24) = "O"
chr_array(25) = "P"
chr_array(26) = "Q"
chr_array(27) = "R"
chr_array(28) = "S"
chr_array(29) = "T"
chr_array(30) = "U"
chr_array(31) = "V"
chr_array(32) = "W"
chr_array(33) = "X"
chr_array(34) = "Y"
chr_array(35) = "Z"

' Agora vamos fazer um Randomize em todo Array

Randomize

' Ok, feito a bagunça no Array vamos preparar
' para gerar a senha


' Enquanto a chave tiver a quantidade de caracteres
' menor que 10 o loop continua gerando ela.


do while len(chave) < 10


num = chr_array(Int(35 * Rnd ))


chave = chave + num

loop

' Chave gerada com sucesso então definimos a
' função GerarChave

GerarChave = chave

End Function

' Finalizando a função


' Mostrando a senha no browser.

' Obs: O número dez significa o tamanho da senha em
' carateres que será criado

response.write "Senha gerada: " & GerarChave(10) & vbcrlf
%>




Enviado por xKuRt em 21/10/2006 às 10:59


Avaliação

Esta publicação ainda não foi avaliada!


Avaliar:


A avaliação de publicações é restrita a membros cadastrados e logados no nosso site.



Comentários

Este artigo ainda não foi comentado ou o(s) comentário(s) que foi(ram) enviado(s) a ele ainda não foi(ram) publicado(s).


Envio de comentário:




  

Sexta, 22 de Agosto de 2014




Leitura recomendada

Java na Web

Top 5 membros

Últimos membros online

Últimos membros cadastrados



Capa do livro
Laboratórios De Tecnologias Cisco Em Infraestrutura De Redes


Capa do livro
Metodologia de Pesquisa para Ciência da Computação


Capa do livro
Sistema de Banco de Dados





Hostnet

IMD