如何判断数据库的指针是指到最后或最前一条？

[hjyong]

例如我用
Private Sub next_Click()
Adodc1.Recordset.MoveNext
End Sub
把指针一条一条移到最后，可是再按按钮时就出错，应该怎样解决？？？

[GoldFox]

最后一条判断: IF Adodc1.EOF()=True Then
第一条判断: IF Adodc1.BOF()=True Then

[hjyong]

谢谢了，可是我加了时去还是不进，可是给多个例子吗？

[吾非大神]

Private Sub next_Click()
Adodc1.Recordset.MoveNext
IF Adodc1.Recordset.EOF Then
Adodc1.Recordset.movefirst
.............
end if
if Adodc1.Recordset.BOF then
..............
end if
End Sub

[吾非大神]

身边没运行程序，自己调试一下吧
或许可以，呵呵

[zhuanzhu_zhizhuo]

Private Sub next_Click()
Adodc1.Recordset.MoveNext
IF Adodc1.Recordset.EOF Then
Adodc1.Recordset.movefirst
.............
end if
if Adodc1.Recordset.BOF then
..............
end if
End Sub

=================================
支持下这个

[hjyong]

我是新手谢谢大家的指点!!