3 replies to this topic

[Vilmar Brazão de Oliveira]

Eu vi esta o Macoratti, mas ela gera caracteres especiais e é preciso gerar um arquivo texto antes.....

Gerando Hash e comparando arquivos
http://www.macoratti.net/vbn_cah1.htm

... eu queria alguma que gera-se o hash a partir de uma string que eu montarei manualmente pegando dados do banco de dados e sequenciando numa string, algo assim
dado1,dado2#dado3,dado4#dado5,dado6#.......

e jogar esta sequência na rotina de gerar hash para sempre gerar o mesmo número conforme os dados de entrada não mudem.

a rotina pode e até deveria ser o mais simples possível, que rodasse no vb6 e vb.net sem precisar usar componentes específicos de apenas algumas linguagens ......

obrigado.

[LeoB]

Uma rotina que rode tanto no VB 6 quanto no VB.Net vai ser difícil. Eu tenho essa aqui em .Net:

Public Function GerarHash(ByVal Texto As String) As String

    Return String.Join("", Array.ConvertAll(Security.Cryptography.SHA1.Create().ComputeHash(System.Text.Encoding.Default.GetBytes(Texto)), New System.Converter(Of Byte, String)(Function(<img src='http://forum.wmonline.com.br/public/style_emoticons/<#EMO_DIR#>/cool.gif' class='bbc_emoticon' alt='B)' /> String.Format("{0:X2}", <img src='http://forum.wmonline.com.br/public/style_emoticons/<#EMO_DIR#>/cool.gif' class='bbc_emoticon' alt='B)' />.ToLower())))

End Function

Usei SHA1, mas pra MD5 acho que é só mudar a classe ali.

[Vilmar Brazão de Oliveira]

Usei SHA1, mas pra MD5 acho que é só mudar a classe ali.

LeoB , obrigado!
Mas, então, acabamos resolvendo o problema por aqui com algum outra algoritmo que pegamos na internet e adaptamos em nossa rotina.
Aplicação está em homologação, em vias de ir para produção...
Abç
Feliz 2011!!!

Edição feita por: Vilmar Brazão de Oliveira, 27/12/2010, 12:45.

[RonsisM]

Free Levitra.Com online pharmacy Priligy United States Viagra Ahnliche Tabletten