Questo sito utilizza cookies, anche di terze parti, per mostrare pubblicità e servizi in linea con il tuo account. Leggi l'informativa sui cookies.
Username: Password: oppure
C# / VB.NET - Funzione di hashing
Forum - C# / VB.NET - Funzione di hashing "Hashword" chi sa come implementarla in vb.net??

Avatar
lucky (Member)
Rookie


Messaggi: 32
Iscritto: 28/06/2008

Segnala al moderatore
Postato alle 20:36
Venerdì, 29/10/2010
Tutto descritto nel titolo,
spero di non aver sbagliato categoria...
Thnx

PM Quote
Avatar
Il Totem (Admin)
Guru^2


Messaggi: 3635
Iscritto: 24/01/2006

Segnala al moderatore
Postato alle 11:35
Sabato, 30/10/2010
Se la specifica implementazione riguarda .NET, è da postare nella sezione .NET World.

Comunque, ho preso da questo sito:
http://www.koders.com/cpp/fidB624D33C45E4C3587375FF7B2ACDD ...
Il codice di HashWord::hash:
Codice sorgente - presumibilmente C# / VB.NET

  1. void HashWord::hash(){
  2.         unsigned x =0;
  3.         hashvalue =0;
  4.         while( wd[x] != '\0'){
  5.                 /* 6 is a random number (base 26 too large)*/
  6.                 hashvalue = ((hashvalue*3)+(wd[x++]-97));      
  7.         }      
  8. }


Creando una classe identica in vb.NET, questo metodo diventerebbe:
Codice sorgente - presumibilmente VB.NET

  1. Public Sub hash()
  2.    Dim x As UInt32 = 0
  3.    hashvalue = 0
  4.    Do While (wd(x) <> Chr(0))
  5.       hashvalue = hashvalue * 3 + wd(x) - 97
  6.       x += 1
  7.    Loop
  8. End Sub


Ultima modifica effettuata da Il Totem il 30/10/2010 alle 11:36


"Infelici sono quelli che hanno tanto cervello da vedere la loro stupidità."
(Fligende Blatter)

"Dubitare di se stessi è il primo segno d'intelligenza."
(Ugo Ojetti)
PM Quote