我使用 Excel VBA 和从 http://www.ch-werner.de/sqliteodbc/ 获得的 SQLite3 ODBC 驱动程序 两者都是 Windows 10 计算机上的 32 位版本。
对具有 16 列和 200 行的单个表进行简单的
Select
查询每行大约需要 200 毫秒(我对其进行了计时)。
对于执行的查询来说,这超过了 30 秒 <30ms in SQLite3.
我尝试了几种cursorType,LockType,CursorLocation,但没有成功
我尝试了 Excel 2010 和 Excel 365。
Sub TestSqlite()
Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cnn = New ADODB.Connection
Set rs = New ADODB.Recordset
cnn.Open "DRIVER=SQLite3 ODBC Driver;Database=C:\Test.sqlite;"
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.LockType = adLockReadOnly
rs.Open "SELECT * from SimpleTable limit 20;", cnn
rs.Close
Set rs = Nothing
cnn.Close
Set cnn = Nothing
End Sub
有什么办法可以解决这个问题吗?