如何在 Visual Basic 6 中解码字符串

How to decode a string in Visual Basic 6

我正在尝试读取 Visual Basic 6 中的 .DB (Paradox 5) 文件。 除 encoding/charset 外,一切正常。它显示为 Iieiei 75a 而不是西里尔字符串。

这是我的 ODBC 连接字符串:

Driver={Microsoft Paradox Driver (*.db )};DriverID=538;Fil=Paradox 4.X;DataCodePage=ANSI;BDE=2;CollatingSequence=ASCII;AutoTranslate=No;DBQ=C:\Database;DefaultDir=C:\Database

请注意,像 Borland Database Desktop 这样的软件可以毫无问题地显示这些字符串。在另一台电脑上也一切正常。

我通过 regedit 进行了以下设置,但没有帮助:

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet.0\Engines\Xbase] 
"DataCodePage"="ANSI" 
"BDE"=dword:00000002 

我也试过用 CharToOem/Oem2Char Win API 函数,没用。

有什么想法吗?

好的,我已经通过更改以下注册表值解决了这个问题:

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet.0\Engines\Xbase] 
"DataCodePage"="ANSI" 
"BDE"=dword:00000002 

[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\CodePage]
"1252"="1251.nls"

上次设置已解决问题。