snipplrCallback({"id":33680,"title":"vbnet-md5-hash","source":"
  1. Public<\/span> Function<\/span> MD5(<\/span>ByVal<\/span> str As<\/span> String<\/span>)<\/span> As<\/span> String<\/span><\/div><\/li>
  2.         Dim<\/span> ASCIIenc As<\/span> New<\/span> ASCIIEncoding<\/div><\/li>
  3.         Dim<\/span> strReturn<\/div><\/li>
  4.         Dim<\/span> ByteSource(<\/span>)<\/span> As<\/span> Byte<\/span> =<\/span> ASCIIenc.<\/span>GetBytes<\/span>(<\/span>str)<\/span><\/div><\/li>
  5.         Dim<\/span> Md5Hash As<\/span> New<\/span> MD5CryptoServiceProvider<\/div><\/li>
  6.         Dim<\/span> ByteHash(<\/span>)<\/span> As<\/span> Byte<\/span> =<\/span> Md5Hash.<\/span>ComputeHash<\/span>(<\/span>ByteSource)<\/span><\/div><\/li>
  7.         For<\/span> Each<\/span> b As<\/span> Byte<\/span> In<\/span> ByteHash<\/div><\/li>
  8.             strReturn &=<\/span> b.<\/span>ToString<\/span>(<\/span>"x2"<\/span>)<\/span><\/div><\/li>
  9.         Next<\/span><\/div><\/li>
  10.         Return<\/span> strReturn<\/div><\/li>
  11.     End<\/span> Function<\/span><\/div><\/li><\/ol><\/pre>","link":"https:\/\/snipplr.com\/view\/33680\/vbnet-md5-hash"});