Dim X
ADORS1.Open "select 阀门号,设备号,允许位,自动控制位 from 设备号和对应点 where 阀门号<= " & ACTUATOR_NUM, CONN1, 3, 2
X = ADORS1.Bookmark
If ADORS1.State = 1 Then ADORS1.Close
ADORS1.CursorLocation = 3
ADORS1.Open "select 阀门号,设备号,允许位,自动控制位 from 设备号和对应点 where 阀门号<= " & ACTUATOR_NUM, CONN1, 3, 2
ADORS1.Bookmark = X
为什么会提示ADORS1.Bookmark = X这行输出无效
问题补充：
会提示书签无效
图片说明：
最佳答案
此回答已完善
判断一下X是否为空
If IsEmpty(X) Then
MsgBox "No Bookmark set!"
Else
ADORS1.Bookmark = X
End If
补充：
在X = ADORS1.Bookmark前加一句ADORS1.MoveFirst
提问者对于答案的评价：
谢谢你的回答，还是会提示ADORS1.Bookmark = X书签无效
最佳答案作者回复:
Microsoft ActiveX 数据对象 (ADO)：
https://docs.microsoft.com/zh-cn/sql/ado/microsoft-activex-data-objects-ado?view=sql-server-ver15
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc316536.html
微信扫一扫 
支付宝扫一扫