G
Guest
I have modified input to the filter by form within the form_applyfilter
procedure as follows. However, the filter does not get modified with this
information
until the filter is removed and reapplied on the results form.
If Len(Me.Filter) > 0 Then
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_WDTH")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_HGHT")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.WINDW_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.WINDW_WDTH")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.PATCH_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.PATCH_WDTH")
Me.Filter = OperationFilter(Me.Filter)
Me.FilterOn = True
End If
Does anyone know how to refresh the filter criteria immediately and before
the results are displayed?
Thank you.
procedure as follows. However, the filter does not get modified with this
information
until the filter is removed and reapplied on the results form.
If Len(Me.Filter) > 0 Then
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_WDTH")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.SIZE_HGHT")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.WINDW_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.WINDW_WDTH")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.PATCH_LEN")
Me.Filter = FilterRanges(Me.Filter, "ESTHDR.PATCH_WDTH")
Me.Filter = OperationFilter(Me.Filter)
Me.FilterOn = True
End If
Does anyone know how to refresh the filter criteria immediately and before
the results are displayed?
Thank you.