从MS Access通过ODBC查询MySQL VBA：ADODB异步执行不起作用

Question

我正在使用Access数据库作为MySQL的后端。为了节省时间和查询时间，我希望MySQL-Server能够并行运行这些查询。

目前我无法告诉VBA异步发送它们。我的代码是这样的：

Do While ... 
    Dim rs_newRecordSet As ADODB.Recordset 
    Set rs_newRecordSet = New ADODB.Recordset 
    rs_newRecordSet.Open Ext_TranslateQuery(str_query), Ext_Connection, , , adAsyncExecute 
Loop 

的待办事项中

因此，尽管循环数查询通过与选项adAsyncExecute一个记录打开。查询全部是INSERT INTO ... SELECT FROM-Queries，所以我不希望记录集返回任何内容。

现在的问题是，即使指定了adAsyncExecute-Option，VBA似乎也要等到Recordset.Open-Command完成。此外，如果我在mysql模式上运行显示进程列表，我只看到一个线程与INSERT INTO ...-查询。

为什么VBA等待查询的执行，我该如何改变这个问题？

非常感谢 巴斯蒂安

Answer 1

谢谢你的帮助，我找到了答案在这里： VB6, ADO, Asynchronous command and closing the connection

你必须创建为要并行执行，因为否则每个记录/命令一个新的连接查询将堆积在连接执行列表中。不要忘记在执行每个查询后关闭连接。