Question

我使用SQLite3 ODBC Driver作为我的连接字符串，

Dim conn As ADODB.Connection
 Set conn = New ADODB.Connection
Dim rs As New ADODB.Recordset

Set conn = New ADODB.Connection
conn.ConnectionString = "DRIVER=SQLite3 ODBC Driver;Database=test.db;LongNames=0;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0;"

conn.Open

rs.Open "select * from Artists", conn, adOpenDynamic, adLockOptimistic
MsgBox rs.Fields(0)

Answer 1

请参阅此处了解连接字符串属性： http://www.connectionstrings.com/sqlite

您还应指定版本（3或2）。

编辑：尝试删除：LongNames = 0; Timeout = 1000; NoTXN = 0; SyncPragma = NORMAL; StepAPI = 0 并添加版本：version = 3 如果它有效，请尝试一次添加一个属性，直到它不再起作用，以识别损坏的属性。

Answer 2

这些是SQLite3 ODBC Driver

的可用连接字符串选项

Description=
Database=<<file_name>
Timeout=
StepAPI=0
SyncPragma=
NoTXN=0
ShortNames=0
LongNames=0
NoCreat=0
NoWCHAR=0
FKSupport=0
LoadExt=

我刚刚创建了一个系统DSN，并在HKLM\SOFTWARE\ODBC\ODBC.INI\<<my_dsn_here>>

处查看了注册表

我如何从SQLite检索数据到VB6？

2 个答案: