Operation is not supported for this type of object. (Error 3251) (1 Viewer)

[foxtet]

Private Sub Form_AfterUpdate()
Dim lngSNO As Long
Dim frm As Form
Dim rs As DAO.Recordset
If IsFormLoaded("frmCargoStatus") Then
Set frm = Forms("frmCargoStatus")("tblCargoStatus subform").Form
lngSNO = frm!Sno
frm.Requery
Set rs = frm.RecordsetClone
rs.FindFirst "[sno] = " & lngSNO
If Not rs.NoMatch Then frm.Bookmark = rs.Bookmark
rs.Close
Set rs = Nothing
Set frm = Nothing
End If
End Sub

When this code executes it gives error Operation is not supported for this type of object. (Error 3251)

 

[arnelgp]

on which line does it fault? is it a linked table?

 

[foxtet]

on which line does it fault? is it a linked table?

No error line is seen. just a message only.
when add records to the form in Assessment notice tab this error occurs.

Plz have look
foxtet