Bookmark and Bookmarkable Properties Example

This example gets the bookmark for a record and then uses the Bookmark property to return to that record.

Dim MyMark As Variant
Data1.DatabaseName = "BIBLIO.MDB"
Data1.RecordSource = "Titles"
...
Data1.Recordset.FindFirst "State = 'NY'"   ' Locate a NY publisher.
If Data1.Recordset.Bookmarkable And Not Data1.Recordset.NoMatch Then
  MyMark = Data1.Recordset.Bookmark        ' Get current Bookmark.
  ' Move to different record.
  Data1.Recordset.FindFirst "City = 'Los Angeles'"
  ...
  Data1.Recordset.Bookmark = MyMark        ' Return to NY record.
End If