VB.NET解密一个散列并在DataGridView中显示

-3

我的散列md5 + salt，其中salt在应用程序中预先制作。VB.NET解密一个散列并在DataGridView中显示

Function md5hash(value As String) As Byte() 
    Return md5.ComputeHash(ASCIIEncoding.ASCII.GetBytes(value)) 
End Function 

Function decrypt(encryptedString As String, key As String) As String 
    de5.Key = md5hash(key) 
    de5.Mode = CipherMode.ECB 

    Dim buffer As Byte() = Convert.FromBase64String(encryptedString) 

    Return ASCIIEncoding.ASCII.GetString(de5.CreateDecryptor().TransformFinalBlock(buffer, 0, buffer.Length)) 
End Function

现在我想检索数据库中散列（加密）的数据。我可以检索数据，但散列。不是等效的字符串。这是我的DataGridView代码。

connection() 
    Dim dataAdapter As New MySqlDataAdapter 
    Dim dataTable As New DataTable 
    Dim bSource As New BindingSource 

Try 
     conn.Open() 

     Dim query As String 
     query = "SELECT column07 AS 'Company ID', column08 AS Lastname, column12 AS Firstname, column06 AS Middlename, column02 AS 'Contact No.', column05 AS 'Current Address', column14 AS 'Permanent Address' FROM dbtest.table01 WHERE column15 = '" & encrypt("Single", salt) & "'" 
     command = New MySqlCommand(query, conn) 'I think this is the part where I put my decrypt method. 
     dataAdapter.SelectCommand = command  'Maybe here. 
     dataAdapter.Fill(dataTable)    'I dont know where and how 
     bSource.DataSource = dataTable   'Please help thanks! 
     DataGridView_Accounts.DataSource = bSource 
     dataAdapter.Update(dataTable) 

     conn.Close() 
    Catch ex As Exception 
     MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) 
    Finally 
     conn.Dispose() 
    End Try

查询工作正常。它只是解密（dehashing）不是。

来源

2017-02-11 Maki

哈希是单向加密，所以他们不能解密。另外，按照今天的标准，MD5是一种全面散列方法。 – Plutonix

就像我所说的，检索正在工作。与散列数据。它甚至可以检索到标签/文本框。我只是不知道如何检索它并显示在datagridview中。 – Maki

我们不知道'de5'是什么，我们不知道'encrypt'的确能理解你正在做什么。通过文本和标题，你不能“散列”散列，这就是他们的观点。我怀疑你在加密，而MD5是用来散列盐的？ – Plutonix

connection() 
Dim dataAdapter As New MySqlDataAdapter 
Dim dataTable As New DataTable 
Dim bSource As New BindingSource 

Try 
    conn.Open() 

    Dim query As String 
    query = "SELECT column07 AS 'Company ID', column08 AS Lastname, column12 AS Firstname, column06 AS Middlename, column02 AS 'Contact No.', column05 AS 'Current Address', column14 AS 'Permanent Address' FROM dbtest.table01 WHERE column15 = '" & encrypt("Single", salt) & "'" 
    command = New MySqlCommand(query, conn) 
    dataAdapter.SelectCommand = command 
    dataAdapter.Fill(dataTable)  
    bSource.DataSource = dataTable  
    DataGridView_Accounts.DataSource = bSource 
    dataAdapter.Update(dataTable) '<===== remove this 

    For i As Integer = 0 To dataTable.Rows.Count - 1 
      dataTable.Rows(i)("Company ID") = decrypt(dataTable.Rows(i)("Company ID"), salt) 
      'place all the columns here 1 by 1 =) 
    Next 

    conn.Close() 
Catch ex As Exception 
    MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) 
Finally 
    conn.Dispose() 
End Try

来源

2017-02-11 17:35:24 Maki

VB.NET解密一个散列并在DataGridView中显示

回答

相关问题