If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Trouble With Recordsets
I have a form with navigation buttons (First, Next, Previous, Last, New). I am trying to make them "Smart" by enabling and disabling them as per the position in the recordset (with the help of a book tutorial).
When I try to use the form I get a "Run-time error '13': Type mismatch". When I click debug the code that is highlighted is "Set rstClone = frm.RecordsetClone". Here is a sample of the first part of the code: Public Function DisablEnable(frm As Form) Dim rstClone As ADODB.Recordset Set rstClone = frm.RecordsetClone If frm.NewRecord Then frm!cmdFirst.Enabled = True frm!cmdNext.Enabled = False frm!cmdPrevious.Enabled = True frm!cmdLast.Enabled = True frm!cmdNew.Enabled = False Exit Function End If .... End Function The public function is kept in a module (basNavigationButtons) and I am calling the function in the forms On Current event ( =DisablEnable([Form]) ). Lastly, I am using Access 2003. PS: I have found this same error when using Set rstClone = frm.RecordsetClone, but could not figure out why. I just had to move on. Jeff Monroe |
Thread Tools | |
Display Modes | |
|
|