TripleDes加密/解密字符串有问号

在vb.net和2.0 Framework中开发了一个旧的Web应用程序。该应用程序读取存储在Windows注册表中的sql server名称的加密信息。当谈到这行代码TripleDes加密/解密字符串有问号

ConnectionStr = Encoding.ASCII.GetString(plainText)

我接收字符串

“P ?? ARSMEYVDE02”

内的问号，它应该是

“PLWARSMEYVDE02”

我试图将编码更改为UTF8，默认或Unicode，但没有运气。这里的功能

Public Function HostLogOnParameters() As Boolean 
Try 
    Dim rk As RegistryKey = Registry.LocalMachine.OpenSubKey(ConfigurationSettings.AppSettings("Registry.LocalMachine") & "Host", False) 
    Dim ConnectionStr As String = rk.GetValue("1") 
    Dim initVector As String = rk.GetValue("2") 
    Dim strKey As String = rk.GetValue("3") 
    Dim dec As New Decryptor 
    dec.Decryptor(EncryptTransformer.EncryptionAlgorithm.TripleDes) 
    dec.IV = Convert.FromBase64String(initVector) 
    'Decrypt the string 
    Dim plainText As Byte() = dec.Decrypt(Convert.FromBase64String(ConnectionStr), Convert.FromBase64String(strKey)) 
    ConnectionStr = Encoding.ASCII.GetString(plainText) 
    ConnectionStr = ConnectionStr.Substring(1) 
    mstrServer = Left(ConnectionStr, InStr(ConnectionStr, "'") - 1) 
    ConnectionStr = ConnectionStr.Substring(mstrServer.Length + 3) 
    mstrDatabase = Left(ConnectionStr, InStr(ConnectionStr, "'") - 1) 
    ConnectionStr = ConnectionStr.Substring(mstrDatabase.Length + 3) 
    mstrUser = Left(ConnectionStr, InStr(ConnectionStr, "'") - 1) 
    ConnectionStr = ConnectionStr.Substring(mstrUser.Length + 3) 
    mstrPassvord = Left(ConnectionStr, InStr(ConnectionStr, "'") - 1) 
    Return True 
Catch ex As Exception 
    Return False 
End Try 
End Function

从plainText作为十六进制的输出。

2750CCD74152534D45595644455630325C44455656533032272C2745594372797374616C486F73744244272C274372797374616C486F737455736572272C273132337265706F7274696E6721402327

来源

2013-11-28 jambis

@owlstead，不知道我是否理解。你想我打印出这行结果Dim plainText As Byte（）= dec.Decrypt（Convert.FromBase64String（ConnectionStr），Convert.FromBase64String（strKey））？ – jambis

是的，正是这样，[转换为十六进制]（http://social.msdn.microsoft.com/Forums/vstudio/en-US/fa53ce74-fd53-4d2a-bc05-619fb9d32481/convert-byte-array-to- hex-string？forum = vbgeneral）当然，我的大脑在处理'20'而不是'0010 0000'或简单的“”字符方面更好。 –

@owlstead，我在主帖中添加了输出。 – jambis

这也可能是在拉丁美洲（ISO 8859-1），因为它然后读取PÌ×ARSMEYVDEV02\DEVVS02，和皮克斯是，如果当然一个众所周知的公司。请注意，Windows-1252是此字符编码的超集。

来源

2013-12-01 21:18:10

这是否解决你的问题，赞比亚？如果你认为它没有，你可以尝试其他字符编码。 –

对不起，我完全忘记了这一点。不，它不能解决我的问题。我尝试了你的建议，但每次我都会弄脏阅读。这是一个即将退役的旧应用程序，它是一个测试环境，所以我将连接字符串移到了web.config文件中。但无论如何感谢您的帮助！ – jambis

@jambis好吧，可惜这不是解决方案，您很快被弃用的应用程序可能会丢失或破坏数据。所有更多的理由去沉没它。如果您认为这个问题对其他人没有用处，您可以删除该问题（否则它将保持未答复状态）。 –

TripleDes加密/解密字符串有问号

回答

相关问题