dlstapleford
Programmer
This code is from a book but when I try to use it, I get a type mismatch error every time. I did call the function as described below. The error occurs on the line that says, "Set rstClone = frm.RecordsetClone"
Public Function DisableEnable(frm As Form)
'To call the function set the form's OnCurrent
'property to =DisableEnable(Form)
Dim rstClone As Recordset
'Create a clone of the form's recordset to
'move around in without affecting the form's
'recordset
Set rstClone = frm.RecordsetClone
Public Function DisableEnable(frm As Form)
'To call the function set the form's OnCurrent
'property to =DisableEnable(Form)
Dim rstClone As Recordset
'Create a clone of the form's recordset to
'move around in without affecting the form's
'recordset
Set rstClone = frm.RecordsetClone