Граждане аксессоведы!
Почему вот в этом куске кода
----------------------------------
Private Sub MoveToCurrCustomer()
Dim rsClone As ADODB.Recordset
Set rsClone = Me.RecordsetClone ' <- ошибка лезет вот тут
rsClone.Find "[ID] = " & intCurrCustomerID, adSearchForward
Me.Bookmark = rsClone.Bookmark
rsClone.Close
Set rsClone = Nothing
End Sub
----------------------------------
При попытке присвоить
Set rsClone = Me.RecordsetClone
вылезает ошибка Error 13 'Type mismatch' ?

Код вроде стандартный - для того, чтобы встать при загрузке формы сразу на нужную запись.

используется Access 2000/2002 mdb, ADO.

Спасибо.

О! Спасибо!
Вот так заработало:
------------------------
Private Sub MoveToCurrCustomer()
Dim rsClone As DAO.Recordset
Set rsClone = Me.RecordsetClone
rsClone.FindFirst "[ID] = " & intCurrCustomerID
Me.Bookmark = rsClone.Bookmark
rsClone.Close
Set rsClone = Nothing
End Sub
------------------------

PS. В FAQ бы это... :)