ciao a tutti,

io vorrei sfogliare i record di un database e se arrivo all'ultimo rinivia dal primo allora ho fatto cosi

codice:
    Set Db = OpenDatabase(App.Path & "\db.mdb", False, False)
    Set Rs = Db.OpenRecordset("link") 'dichiari il recordset
    Set Data.Recordset = Rs ' Assegna il Recordset
    While Not Data.Recordset.EOF
    id = (Data.Recordset.Fields("id"))
    Data.Recordset.MoveNext
    Wend
in questo modo li sfoglio tutti e stampo l'id per sapere quanti record ho, adesso ho due tasti (command1,command2) che cosa devo assagnare per sfogliare il database??