我使用SQLite3 ODBC驱动程序作为连接字符串，
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)
2条答案
按热度按时间ahy6op9u1#
有关连接字符串属性，请参阅此处：http://www.connectionstrings.com/sqlite
您还应该指定版本（3或2）。
编辑：尝试删除：return 0; Timeout=1000; NoTXN=0;SyncPragma=正常; StepAPI=0并添加版本：version=3如果它工作，尝试一次添加一个属性，直到它不再工作，以确定损坏的属性。
pnwntuvh2#
以下是
SQLite3 ODBC Driver的可用连接字符串选项我刚刚创建了一个系统DSN，并在注册表中查找
HKLM\SOFTWARE\ODBC\ODBC.INI\<<my_dsn_here>>