VB转C#后的加密差异

Question

正在尝试将代码从 VB 转换为 C#，请参阅下面的 VB 代码

Dim StrCount As Int16
Dim str1, str2, EncryptedStr As String
EncryptedStr = String.Empty
theString = "Test@1234"

For StrCount = 1 To Len(theString)
    str1 = Asc(Mid(theString, StrCount, 1)) - 1
    str2 = str1 + Asc(Mid(StrCount, 1))
    EncryptedStr = EncryptedStr + Chr(str2)
Next

转换后的 C# 代码

string EncryptedStr = string.Empty;
Encoding encode1 = Encoding.ASCII;
Byte[] encodedBytes = encode1.GetBytes("Test@1234");  

for (int count = 0; count < encodedBytes.Length; count++)
{
    int str1 = encodedBytes[count] - 1;
    Encoding encode2 = Encoding.ASCII;
    Byte[] encodedBytes1 = encode2.GetBytes((count + 1).ToString());  
    int str2 = str1 + (int)encodedBytes1[0];
    EncryptedStr += Convert.ToChar(str2);
}

它工作正常，但我面临的问题是加密密码在 VB 和 C# 中不同

我尝试加密一个字符串“Test@1234”，加密的结果是

VB: „–¥§tfhjl

C#: ¥§tfhjl

我调试并注意到在 C# Convert.ToChar(132) & Convert.ToChar(150) 中给出的是空值。

谁能解释一下，这里出了什么问题

Answer 1

正如此答案here 的评论中所解释的，VB.NET 在当前 Windows 代码页中返回 ANSI 代码，而不是 ASCII 代码。不要期望得到相同的输出，除非您使用相同的函数，引用Microsoft.VisualBasic 并使用Strings.Asc 和Strings.Chr 以获得相同的结果。

Answer 2

最简单且与原始代码相同的解决方案是使用VisualBasic 命名空间中的Asc 和Chr 方法，因为它们具有相同的功能。

但是

Asc 使用 ANSI，它可以在不同的语言环境和不同的机器上改变，所以如果你真的很固执，你可以尝试通过显式定义要使用的编码来模拟这一点。

这会在 my 机器上产生相同的结果（但要小心在其他机器上进行测试）：

Public Function EncryptString(aString As String) As String
    Dim sb As New StringBuilder
    Dim enc = Encoding.GetEncoding("windows-1252")
    For i = 0 To aString.Length - 1
        Dim x = enc.GetBytes(aString.Substring(i, 1))(0) - 1
        Dim y = enc.GetBytes((i + 1).ToString)(0) + x
        Dim b() As Byte = {y}
        sb.Append(enc.GetString(b))
    Next
    Return sb.ToString
End Function

因此（未经测试的）C# 等效项是：

public string EncryptString(string aString)
{
    StringBuilder sb = new StringBuilder();
    var enc = Encoding.GetEncoding("windows-1252");
    for (var i = 0; i < aString.Length; i++)
    {
        var x = enc.GetBytes(aString.Substring(i, 1))[0] - 1;
        var y = enc.GetBytes((i + 1).ToString())[0] + x;
        byte[] b = {y};
        sb.Append(enc.GetString(b));
    }
    return sb.ToString();
}

Answer 3

vb.net 遗留的 Asc 函数，确实是使用 System.Text.Encoding.Default。在您的 C# 版本中，您使用的是 ASCII。检查：

        string EncryptedStr = string.Empty;
        Encoding encode1 = Encoding.Default; //.ASCII;
        Byte[] encodedBytes = encode1.GetBytes("Test@1234");

        for (int count = 0; count < encodedBytes.Length; count++)
        {
            int str1 = encodedBytes[count] - 1;
            Encoding encode2 = Encoding.Default;
            Byte[] encodedBytes1 = encode2.GetBytes((count + 1).ToString());
            int str2 = str1 + (int)encodedBytes1[0];
            EncryptedStr += Convert.ToChar(str2);
        }