Type Mismatch 13

[CJ]

I'm learning Access from a book w/ CD - "Access 2000 VBA
Handbook".

I'm creating the code to move first, next, last, etc and
also checking whether its BOF or EOF.

The code will work in the mdb from the cd, but not from a
mdb that I create.

I'm passing the form as an argument.

OnCurrent=DisableEnable([Form])

The code is
Public Function DisableEnable (frm as Form)
Dim rstClone as Recordset
Set rstClone = frm.RecordsetClone

At the Set line, Access gives me a Type Mismatch error.

Any thoughts?

CJ

 

[Joe Fallon]

You most likely have a problem with references.
Open a code module.
Tools, References

Uncheck ADO
Check Microsoft DAO 3.6