尝试运行该脚本时,出现错误“运行时错误'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
答案 0 :(得分:1)
该错误是由我的手表引起的。
在我的监视列表中,试图调试另一个问题,我设置了以下监视
rs.GetRows
删除此表解决了我的问题。