Compile error

[IMO]

Hi All,

Can someone tell me why this code isn't working? It's driving me nuts! I'm getting the error 'Method or data member not found' and .FindFirst is highlighted.

Thanks in advance
IMO

Private Sub List8_DblClick(Cancel As Integer)
On Error GoTo Err_listbox_Click

Dim stDocName As String
Dim rst As Recordset, strCriteria As String
stDocName = "frmProducts"

strCriteria = "[ProductID]=" & "'" & Me![List8] & "'"
DoCmd.OpenForm stDocName

Set rst = Forms!editform.RecordsetClone
rst.FindFirst strCriteria
Forms!editform.Bookmark = rst.Bookmark
Me!List8 = ""

Exit_listbox_Click:
Exit Sub

 

[Peter D]

You may not have a reference to DAO.

Click Tools > References from any module in design mode. Do you see a check mark next to "Microsoft DAO 3.x Object Library"? If not, put one there, then recompile.

Hope this helps,

 

[IMO]

Peter,

Thanks for your reply. I checked the Microsoft DAO 3.6 Object Library but I still get the same error. Any other thoughts?

Thanks
IMO

 

[Rich]

http://members.rogers.com/douglas.j.steele/AccessReferenceErrors.html

 

[bjackson]

try moving dao.3.6 up as far as you can
on the list

 

[IMO]

Rich,

Thanks for the reference guide, I'll read that thoroughly.


bjackson,

Thanks for the reply, I'll give it a shot when I get home .

I'll let you both know the outcome
Thanks again
IMO

 

[IMO]

Got it working by moving it up further the priority list.

Thanks again

IMO