Как получить данные из SQLite для VB6?

Question

Я использую драйвер ODBC для SQLite3 в качестве строки подключения,

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 И добавьте версию: версия = 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>>