, MD5 . , VB 1 , . , MD5 VB , .
If all this in 1 line of code is very important, here is 1 line of VB. which does not use the System.Web namespace.
Dim MD5 As New System.Security.Cryptography.MD5CryptoServiceProvider() : Dim HashBytes() As Byte : Dim MD5Str As String = "" : HashBytes = MD5.ComputeHash(System.Text.Encoding.UTF8.GetBytes("MyString")) : For i As Integer = 0 To HashBytes.Length - 1 : MD5Str &= HashBytes(i).ToString("x").PadLeft(2, "0") : Next
This will be the "MyString" hash and save the MD5 sum to MD5Str.
source
share