Hello all.
I have a form that is used to grade employees, it has three phases, 45,90 and 120 days review, I have it set up that after the 45 days scores are entered the user can go back and click a check mar that shows them the previous scores when they are going to enter the 90 days scores.
the problem I have is the following:
I found this code to filter the records based on a name selection:
Code:
Sub SetFilter()
Dim LSQL As String
'On Error Goto Err_LogErrors
LSQL = "Select * from Tbl_Temp_Employee_Reviews_45_Days"
LSQL = LSQL & " Where Employee_Name_45_Days ='" & CboSelected & "'"
Form_SubForm_Temporary_Employee_Evaluation.RecordSource = LSQL
'Exit_SetFilter:
Exit Sub
'Err_LogErrors:
'Call LogErrors(Err.Number,Err.Description,"LSQL Failed Contact Administrator")
'Resume Exit_SetFilet
End Sub
Private Sub Form_Open(Cancel As Integer)
'Call subroutine to set filter based on selected Employee Name
SetFilter
End Sub
Private Sub CboEmployee_Name_AfterUpdate()
'Call subroutine to set filter based on selected Employee Name
SetFilter
End Sub
when I select a name from the CboEmploye_Name which is an Unboundbox, the records don't show up however after i select a name from the box and the go to design view and then back, there it is the records are showing, what is causing this?
why are the records only showing after i go to design view and back?
I am attaching a rough sample, thanks in advance for all the help.SampleFile01.zip