如何快速定位記錄

bbsliu

在rstmp中，知道數(shù)據(jù)在i 的位置，如何能定位到
rstmp.move(i)
提示BOF或EOF錯(cuò)誤。
求解，謝謝。

roych

這個(gè)需要先在記錄集里確定其位置。
一般建議先移動(dòng)到最末再移動(dòng)到開始，這樣可以提高讀取記錄集的效率，免于出錯(cuò)。如下面的代碼所示，將按bulk ID進(jìn)行排序后，移動(dòng)到第十條（需要提醒的是，MoveFirst已經(jīng)是第一條了，因此，第十條只需要Move9就可以了），并在立即窗口里顯示第一個(gè)字段的值。

1. Sub test()
   
2. Dim rst As New ADODB.Recordset
   
3. Dim i As Long
   
4. rst.Open "select * from Main order by [bulk id]", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
   
5. i = 9
   
6. rst.MoveLast
   
7. rst.MoveFirst
   
8. rst.Move i
   
9. Debug.Print rst(0).Value
   
10. rst.Close
    
11. End Sub

復(fù)制代碼

事實(shí)上，如果綁定窗體的話，可以考慮用FindFirst方法和Bookmark屬性來(lái)跳轉(zhuǎn)到所需記錄。