Applying Filters and Turning them off

[Jarrod Shumaker]

I have a form that uses 2 buttons, one button applies a filter according to
a query the other button is "supposed" to turn the filter off then show all
records.

The following is the code for each of the buttons



Apply Filter Button

Private Sub Command429_Click()

If IsNull(Me![FilterCase]) Then

DoCmd.ApplyFilter "ReportHorryCheckingTMS", ""
FilterCase = ""

Else

DoCmd.ApplyFilter "FilterCaseNumHorry", ""
FilterCase = ""

End If

End Sub



Show All Records Button

Private Sub ShowAll_Click()

DoCmd.ShowAllRecords
Me.FilterOn = False

End Sub

(i've tried putting the "Me.FilterOn = False" before the "showallrecords" to
no avail.)