[VB6] muoversi tra i record

[ladyBlu]

se a te interessa sapere quanti record hai ti basta fare un RecordCount, in questo modo:

Set Db = OpenDatabase(App.Path & "\db.mdb", False, False)
    Set Rs = Db.OpenRecordset("link") 'dichiari il recordset
    Set Data.Recordset = Rs ' Assegna il Recordset
    id = Data.Recordset.RecordCount

per muoverti invece tra i recordset ti sarà sufficiente utilizzare le proprietà MoveFirst, MoveLast, MovePrevious, MoveNext.
in questo modo:

Data.Recordset.MoveFirst

Data.Recordset.MoveLast

Data.Recordset.MovePrevious

Data.Recordset.MoveNext