【发布时间】:2018-06-19 16:30:15
【问题描述】:
尝试运行此脚本时,我收到错误消息“运行时错误 '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
【问题讨论】: