0

文字列の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

しかし、base64でエンコードされたものではなく、プレーンなMD5が必要です。Convert.ToString（ByteHash）を返しても役に立ちませんでした。だからあなたの指示が必要です。

ありがとう

4

1 に答える 1

1

必要なのは、エンコードされた文字列の代わりにByte[]toを隠すことだけでしたStringBase64

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
于 2013-02-16T05:30:03.683 に答える