Code works but dos'ent compile

[timothyl]

Hello, the code below run but will not compile, I get

Me.RecordsetClone() method or data member not found, is this a library issue?, or improper coding, I can't seem to figure it out, any insight is appreciated, thanks

Dim recClone As Recordset
Set recClone =

If Me.NewRecord Then
cmdFirst.Enabled = True
cmdPrevious.Enabled = True
cmdNext.Enabled = False
cmdDelete.Enabled = False
cmdLast.Enabled = True
cmdNew.Enabled = True
Exit Sub
End If


'cmdNew = Me.AllowAdditions
If recClone.RecordCount = 0 Then
cmdDelete.Enabled = False
cmdFirst.Enabled = False
cmdNext.Enabled = False
cmdPrevious.Enabled = False
cmdLast.Enabled = False
Else
cmdDelete.Enabled = True
cmdFirst.Enabled = True
cmdLast.Enabled = True

recClone.Bookmark = Me.Bookmark

recClone.MovePrevious
cmdPrevious.Enabled = Not (recClone.EOF)
recClone.MoveNext

recClone.MoveNext
cmdNext.Enabled = Not (recClone.EOF)
recClone.MovePrevious
End If
recClone.Close

End Sub

 

[boblarson]

Change this:

Dim recClone As Recordset

to this:

Dim recClone As DAO.Recordset

 

[timothyl]

Thank you, boblarson

 

[boblarson]

Thank you, boblarson