okay heres my code:
Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
If IsFormOpen("associate/project") = True Then
DoCmd.ApplyFilter , "LastName = Forms![Associate/Project]![txtlast]"
End If
On Error GoTo Err_Form_Load
DoCmd.ApplyFilter , "LastName =...