MoveNext to metoda obiektu Recordset powodująca przejście do następnego rekordu.
Metoda ta jest wykorzystywana do przechodzenia do kolejnych rekordów, najczęściej w pętli.
Np.
|
Private Sub PrzejdzDoNastepnego() Dim RST As ADODB.Recordset Set RST = New ADODB.Recordset If Not .EOF Then .MoveFirst While Not .EOF '(…) If Not .EOF Then .MoveNext Wend .Close End With Set RST = Nothing End Sub |
Po dojściu do ostatniego rekordu Recordset, metoda MoveNext nie wywoła błędu, ale już próba odczytu kolejnych pól po takim przejściu wywoła błąd 3021.
A tu możesz mi postawić kawę:
