Vb6 ADODB无法选择扩展ASCII字符_Vb6_Adodb

Vb6 ADODB无法选择扩展ASCII字符

vb6

Vb6 ADODB无法选择扩展ASCII字符,vb6,adodb,Vb6,Adodb,我正在使用ADODB和VB6从Excel中选择数据。Excel中的“Book_Title”列包含扩展ASCII字符（Abreve-Ă）但是当使用下面的代码时，我只得到“A”而不是Abreve sConn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=D:\sheik\metadata.xls" rs.Open "SELECT [Book_Title], [Author_Title] FROM [Sheet1$], sConn 这里

我正在使用ADODB和VB6从Excel中选择数据。Excel中的“Book_Title”列包含扩展ASCII字符（Abreve-Ă）

但是当使用下面的代码时，我只得到“A”而不是Abreve

sConn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=D:\sheik\metadata.xls"
rs.Open "SELECT [Book_Title], [Author_Title] FROM [Sheet1$], sConn

这里的问题是，出于某种原因，Excel驱动程序正在将字符串转换为ANSI符号。一些“聪明”的代码正在将Ă字符（258）转换为A（65）

如果已安装带有ISAM Excel驱动程序的JET驱动程序，则以下连接字符串将使用它们：

sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\sheik\metadata.xls;Extended Properties=""Excel 8.0;"""

现在将返回未转换的字符串。但是，您可能无法在任何内置VB控件或IDE中正确地看到它们，因为当前代码页中不太可能存在此字符

但是您可以通过使用AscW（）函数查看字符串中的字符来确认第一个字符是正确的，这些字符是通过Mid$（）获得的