如何从 SQLite 检索数据到 VB6?
我使用 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)
I am using SQLite3 ODBC Driver as my connection string,
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)
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(2)
有关连接字符串属性,请参阅此处:
http://www.connectionstrings.com/sqlite
您还应该指定版本(3 或 2) 。
编辑:尝试删除:LongNames=0;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0
并添加版本:version=3
如果它有效,请尝试一次添加一个属性,直到它不再起作用,以识别损坏的属性。
Refer here for the connection string properties:
http://www.connectionstrings.com/sqlite
You should also specify the version (3 or 2).
Edit: try to remove: LongNames=0;Timeout=1000;NoTXN=0;SyncPragma=NORMAL;StepAPI=0
And add the version: version=3
If it works, try to add a property at a time until it won't work anymore, to identify the broken property.
这些是 SQLite3 ODBC 驱动程序的可用连接字符串选项
我刚刚创建了一个系统 DSN 并在注册表中查看了 HKLM\SOFTWARE\ODBC\ODBC.INI\<>< /代码>
These are available connect string options for
SQLite3 ODBC Driver
I just created a system DSN and looked in registry at
HKLM\SOFTWARE\ODBC\ODBC.INI\<<my_dsn_here>>