尝试将记录集数组化时出现错误“ BOF或EOF为true ...”

时间:2018-06-19 16:30:15

标签: excel vba ms-access

尝试运行该脚本时,出现错误“运行时错误'3021'BOF或EOF为True,或者当前记录已删除。请求的操作需要当前记录。”

Function ExecuteSelect(sSelect As String) As Variant

    Dim rs As ADODB.Recordset
    Dim a As Variant

    Set rs = New ADODB.Recordset

    OpenConnection

    rs.Open sSelect, DBCon, adOpenStatic, adLockOptimistic

    a = rs.GetRows

    CloseConnection

    ExecuteSelect = a
End Function

1 个答案:

答案 0 :(得分:1)

该错误是由我的手表引起的。

在我的监视列表中,试图调试另一个问题,我设置了以下监视

rs.GetRows

删除此表解决了我的问题。