Question

尝试将数据库中的表数据写入工作表时出现以下错误。

我的代码如下：

Public Sub download_nodes()

    Dim pull As New QueryHandler
    Dim rst As Recordset

    'Get info from mysql into Recordset
    With pull
      .ConnectionString = "localhost"
      .SQLQuery = "SELECT * FROM `table_db`;"
      Set rst = .RetrieveQuery
    End With

    'Write data in worksheet "Test"
    If Not rst.EOF Then
        Sheets("Test").Range("A1").CopyFromRecordset rst
    End If

End Sub

任何想法可能是什么问题？谢谢！

Answer 1

我知道这个问题将近1年了，但是今天我又遇到了这个错误。在这些情况下，您需要说明整个环境。我在Excel 2016 32位，MariaDB 10.1.14和Maria ODBC驱动程序3.1.1下遇到E_FAIL错误，但过去我在ODBC驱动程序2.0.18和3.0.6下也遇到了该错误

我仍然不确定是否在3.1.1中重新引入了该错误或什么，但是它似乎与DATE字段有关。您可以通过将它们转换为字符串来解决它，但是如果您的环境有点像我的环境，那么尝试使用不同的ODBC驱动程序似乎是最简单的方法。

数据提供者或其他服务返回了E_FAIL状态（vba mysql记录集）

1 个答案: