用於測試表情的VB.NET和MD5

Question

我想獲取字符串的MD5值。在stackoverflow中搜索並找到答案。

代碼：

Private Function GenerateHash(ByVal SourceText As String) As String 
    Dim Ue As New UnicodeEncoding() 
    Dim ByteSourceText() As Byte = Ue.GetBytes(SourceText) 
    Dim Md5 As New MD5CryptoServiceProvider() 
    Dim ByteHash() As Byte = Md5.ComputeHash(ByteSourceText) 
    Return Convert.ToBase64String(ByteHash) 
End Function 

但我需要純MD5，沒有base64編碼。 Return Convert.ToString（ByteHash）沒有幫助我。所以需要你的指導。

感謝

Answer 1

所有u需要是隱蔽的Byte[]到String代替Base64編碼字符串

Return System.Text.Encoding.ASCII.GetString(ByteHash) 

固定功能：

Private Function GenerateHash(ByVal SourceText As String) As String 
    Dim Ue As New UnicodeEncoding() 
    Dim ByteSourceText() As Byte = Ue.GetBytes(SourceText) 
    Dim Md5 As New MD5CryptoServiceProvider() 
    Dim ByteHash() As Byte = Md5.ComputeHash(ByteSourceText) 
    Return System.Text.Encoding.ASCII.GetString(ByteHash) 
End Function