Mycon.ConnectionString = "provider=Microsoft.jet.OLEDB.4.0;" & "data source=" & App.Path & "\data\db0.mdb"
Mycon.Open
MyRs.Open "select * from GL", Mycon, adOpenDynamic
这样一个数据库
我想通过一个查询改变MyRs指针指向的位置,应该怎么做?
Mycon.Open
MyRs.Open "select * from GL", Mycon, adOpenDynamic
这样一个数据库
我想通过一个查询改变MyRs指针指向的位置,应该怎么做?
例如用这个查询
Dim strsql As String
strsql = "select * from GL where x<Position(0)+0.0001 and x>Position(0)-0.0001 and y<Position(1)+0.0001 and y>Position(1)-0.0001"
If MyRs1.State = adStateOpen Then MyRs1.Close
MyRs1.Open strsql, Mycon, adOpenKeyset, adLockReadOnlyMyRs.move ?
可以通过
MyRs.movenext
MyRs.MovePrevious
MyRs.MoveLast
等来控制记录集的移动