Подскожите пожалуйста что за ошибка такая:

Run-time error '7004'
The rowset is not bookmarkable

Привожу код:

В модуль класса:
_____________________________________________________________________
Private mrsCustomer As ADODB.Recordset

Private Sub Class_Initialize()
Set mrsCustomer = New ADODB.Recordset
mrsCustomer.Source = "select * from tblCustomer"
mrsCustomer.CursorType = adOpenKeyset
mrsCustomer.LockType = adLockOptimistic
mrsCustomer.ActiveConnection = "DSN=JetNovelty;"
mrsCustomer.Open

DataMembers.Add "Customers"
End Sub

Private Sub Class_GetDataMember(DataMember As String, Data As Object)
Select Case DataMember
Case ""
Set Data = Nothing
Case "Customers"
Set Data = mrsCustomer
Case Else
' Raise an error here
End Select
End Sub
_____________________________________________________________________

В frmMain :
_____________________________________________________________________
Private mCustData As CCustData

Private Sub Form_Load()
' Create the data source object
Set mCustData = New CCustData

' Bind the object to grid
Set DataGrid1.DataSource = mCustData
DataGrid1.DataMember = "Customers" '<---------Здесь вылетает ошибка

End Sub
_____________________________________________________________________

На форме DataGrid.

Где ошибка?
Может кто подскажет.

Пардон, ошибка вылетает на END SUB завершающем Sub Class_GetDataMember
После прохода DataGrid1.DataMember = "Customers"

ставлю курсор adOpenStatic (3), а после mrsCustomer.Open, курсор сам (чтоб ему) стоновится mrsCustomer.Open (1)

сделал так:

mrsCustomer.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\novelty.mdb;Persist Security Info=False;CursorLocation=adUseClient"

незнаю правильно ли я понял совет, но вылетать стало на этой строке с ошибкой "Невозможно найти устанавливаемый ISAM"

PS:может я чё не так понял?

ЗАРАБОЛАЛО!!!!!!!!!!!!!
вот спосибо!