Varför funkar inte min move funktion? Det verkar lite knepigt att det inte funkar. Problemet är att när du får .EOF och .BOF så har du redan "gått för långt", du har alltså kommit till ingen post, när .EOF eller .BOF insträffar kan du t.ex. gå tillbaka ett steg eller använda Kontons lösning, den borde fungera.Access move .EOF ????
Har 4 command knappar som flyttar RS i min Access db och när den kommer till .BOF eller .EOF så sätter jag knapparna Enabel=False.
Men den känner inte av argumentet .EOF & .BOF och ett db error blir.
ex: If mittRS.EOF then msgbox"sista posten",,"Typ!"
Någon!?Sv: Access move .EOF ????
Vad har du för CursorType ?
Nedan är en rutin jag brukar använda för move knappar
Private Sub cmdMove_Click(Index As Integer)
Select Case Index
Case 0 'move to the first record
objRs.MoveFirst
Case 1 'move to next record
objRs.MoveNext
Case 2 'move to previous record
objRs.MovePrevious
Case 3 'move to the last record
objRs.MoveLast
End Select
If objRs.BOF Then objRs.MoveFirst
If objRs.EOF Then objRs.MoveLast
showCurrentRec 'Funktion för att visa aktuellt record
End SubSv: Access move .EOF ????
/Johan