J
Jim
The following code behind the form works fine in access 97, but once
the database is converted to access 2000, running this returns no
records. Running the query standalone works, it just doesn't seem to
work from the screen. Has there been a change from access 97 to access
2000 that may affect this type of code that I've missed? any help is
greatly appreciated!!!
Private Sub Requires_Tracking_Info_Filter_Click()
On Error GoTo Err_Requires_Tracking_Info_Filter_Click
If IsNull(Me![requires tracking info filter]) And IsEmpty(Me![requires
tracking info filter]) Then
TrackParmFilter = Null
Else
TrackParmFilter = "([IL Number] = null And [Event] = Null And
[Comments] = Null)"
End If
Apply_Filter (TrackParmFilter)
Me.Refresh
DoCmd.GoToControl "[Team Filter]"
Exit_Requires_Tracking_Info_Filter_Click:
Exit Sub
Err_Requires_Tracking_Info_Filter_Click:
MsgBox Err.Description
Resume Exit_Requires_Tracking_Info_Filter_Click
End Sub
the database is converted to access 2000, running this returns no
records. Running the query standalone works, it just doesn't seem to
work from the screen. Has there been a change from access 97 to access
2000 that may affect this type of code that I've missed? any help is
greatly appreciated!!!
Private Sub Requires_Tracking_Info_Filter_Click()
On Error GoTo Err_Requires_Tracking_Info_Filter_Click
If IsNull(Me![requires tracking info filter]) And IsEmpty(Me![requires
tracking info filter]) Then
TrackParmFilter = Null
Else
TrackParmFilter = "([IL Number] = null And [Event] = Null And
[Comments] = Null)"
End If
Apply_Filter (TrackParmFilter)
Me.Refresh
DoCmd.GoToControl "[Team Filter]"
Exit_Requires_Tracking_Info_Filter_Click:
Exit Sub
Err_Requires_Tracking_Info_Filter_Click:
MsgBox Err.Description
Resume Exit_Requires_Tracking_Info_Filter_Click
End Sub