Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

2007 Conversion issue

Status
Not open for further replies.

Penny001

Programmer
Feb 20, 2008
17
US
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.
 
I have been having problems with Requery crashing in 2007 when it worked fine in previous versions. Try commenting it out & see what happens.

An làmb a bheir, ‘s i a gheibh.
 
Replace this:
DoCmd.ApplyFilter , "EMPL_ID = Forms!CheckInOutTools!InpEmpID"
with this:
[tt]Me.Filter = "EMPL_ID='" & Me!InpEmpID & "'"[/tt]

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top