I converted a 2003 database to 2007 and all works well except for one form – which worked perfectly in 2003. This form opens to only a gray screen. This form is the only one that opens with a filter – and I feel sure this is the problem. I did not create this database and I’m not sure how to fix it.
PROPERTIES:
RECORD SOURCE = EMPLOYEEWITHTOOLS
FILTER: EMPL_ID = Forms!CheckInOutTools!InpEmpID
ON CURRENT:
Private Sub Form_Current()
Me.InpEmpID = Me.EMPL_ID
DoCmd.Maximize
End Sub
ON GOT FOCUS:
Private Sub Form_GotFocus()
Me.Requery
End Sub
UNBOUND FIELD: NAME = INPEMPID
ROW SOURCE: SELECT DISTINCT AllEmployeesAndTools.EMPL_ID FROM AllEmployeesAndTools;
AFTER UPDATE:
Private Sub InpEmpID_AfterUpdate()
txtUserUpdated = False
DoCmd.ApplyFilter , "EMPL_ID = Forms!CheckInOutTools!InpEmpID"
End Sub
We are going to update all databases this weekend to 2007 and I don’t know how to make this one work. Any help is appreciated.
PROPERTIES:
RECORD SOURCE = EMPLOYEEWITHTOOLS
FILTER: EMPL_ID = Forms!CheckInOutTools!InpEmpID
ON CURRENT:
Private Sub Form_Current()
Me.InpEmpID = Me.EMPL_ID
DoCmd.Maximize
End Sub
ON GOT FOCUS:
Private Sub Form_GotFocus()
Me.Requery
End Sub
UNBOUND FIELD: NAME = INPEMPID
ROW SOURCE: SELECT DISTINCT AllEmployeesAndTools.EMPL_ID FROM AllEmployeesAndTools;
AFTER UPDATE:
Private Sub InpEmpID_AfterUpdate()
txtUserUpdated = False
DoCmd.ApplyFilter , "EMPL_ID = Forms!CheckInOutTools!InpEmpID"
End Sub
We are going to update all databases this weekend to 2007 and I don’t know how to make this one work. Any help is appreciated.