如何根据当前窗体的当前记录在其它窗体中查找相应记录

Kiss-win

Private Sub FORM_Current()
Dim rs As Object

Set rs = FORMs!job_out!Job_out_2.FORM.RecordsetClone
rs.FindFirst "[TempID] = '" & Me![TempID] & "'"
FORMs!job_out!Job_out_2.FORM.Bookmark = rs.Bookmark
End Sub
-----------------------------------------------------
在MDB中可以用以上代码令到主窗体（JOB_OUT）中的两个子窗体的当前记录同步，但在ADP中却失效，请问，若要在ADP中实现同样的功能该如何编写代码？请指教，谢谢！

Kiss-win

请问有没有人可以帮一下我呀？版主？你在哪里啊？