VB.NET使用Rfc2898DeriveBytes哈希密码时遇平台不支持错误求解决

你遇到的PlatformNotSupportedException是因为当前运行平台不支持Rfc2898DeriveBytes搭配SHA3_512的组合。SHA3系列算法在部分.NET版本或运行环境中，并未被集成到Rfc2898DeriveBytes的实现中，导致该操作无法执行。

另外需要注意：原代码中直接调用db.ToString()是错误的，Rfc2898DeriveBytes的ToString()仅返回类型名称，并非哈希结果，必须通过GetBytes()方法获取派生的密钥字节数组后再转换为字符串。

方案一：改用平台兼容的哈希算法（推荐） #

将哈希算法替换为Rfc2898DeriveBytes普遍支持的SHA2系列（如SHA256、SHA512），这是最稳妥的方案，代码修改如下：

Public Function GetSaltedHash(pw As String, salt As Byte(), iterations As Integer) As String
    ' 使用SHA256（或替换为HashAlgorithmName.SHA512）
    Dim hashAlg As HashAlgorithmName = HashAlgorithmName.SHA256
    ' 使用Using语句确保资源释放
    Using deriveBytes As New Rfc2898DeriveBytes(pw, salt, iterations, hashAlg)
        ' 获取64字节的派生密钥（可根据需求调整长度），转换为Base64字符串存储
        Return Convert.ToBase64String(deriveBytes.GetBytes(64))
    End Using
End Function

方案二：手动实现基于SHA3-512的密钥拉伸 #

如果必须使用SHA3-512，可以基于HMACSHA3_512手动实现PBKDF2逻辑，模拟密钥拉伸效果：

Public Function GetSaltedHashWithSHA3(pw As String, salt As Byte(), iterations As Integer) As String
    Dim passwordBytes As Byte() = Encoding.UTF8.GetBytes(pw)
    
    Using hmac As New HMACSHA3_512(passwordBytes)
        Dim currentData As Byte() = salt
        For i As Integer = 0 To iterations - 1
            currentData = hmac.ComputeHash(currentData)
        Next
        Return Convert.ToBase64String(currentData)
    End Using
End Function

• 迭代次数：建议设置为100000以上（根据硬件性能调整），更高的迭代次数能提升抗暴力破解能力。
• 盐的生成：每个用户的盐必须是唯一的随机值，长度至少16字节，可通过RandomNumberGenerator.GetBytes(16)生成。
• 存储要求：保存哈希值时，需同时存储盐和迭代次数，以便验证密码时使用相同参数重新计算哈希进行比对。

内容的提问来源于stack exchange，提问作者Funkmasta