Re: Access module does not continue past the Filter Method

Decompile a copy of the database by entering something like this at the
command prompt while Access is not running. It is all one line, and include
the quotes:
"c:\Program Files\Microsoft office\office\msaccess.exe" /decompile
"c:\MyPath\MyDatabase.mdb"
Then compact the database.

You have not actully set the FilterOn property. Additionally, it may not
work as expected if the form is dirty with a record that cannot be saved
(e.g. required field missing, or validation rule not met.)

Try something like this:
Public Sub Apply_Tech_Filter()
With Forms![Technical Form]
If .Dirty Then .Dirty = False
.Filter = "RequestType = 1"
.FilterOn = True
End With
Debug.Print "Past the Filter"
End Sub

(We are assuming that RequestType is a Number type field.)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"dalbin" <dalbin@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:F32C47F1-345F-4613-A0EE-14BB5F4AB570@xxxxxxxxxxxxxxxx
I have a subroutine in an Access Module that creates and applies a filter.
When I call the subroutine, it does apply the filter, giving no error
messages. But, the program stops after the filter is applied. It does
not
continue to process subsequent commands. Please provide any insight into
why
this is happening.

The code is:

Public Sub Apply_Tech_Filter()
Dim RequestType As Integer
Request_Type = 1
Forms![Technical Form].Filter = "RequestType = " & Request_Type
Debug.Print "Past the Filter"
End Sub

PROBLEM: It does not proceed to the "Debug.Print" Line.
NOTE: RequestType is a field on the "Technical Form" Form.


.

Relevant Pages

  • Re: OO vs. RDB challenge
    ... > Layer 1. ... If you filter your data after you retrieve it, ... possible to redesign the database schema to enable SQL to do its job. ... A good RDBMS could integrate an external authentication server. ...
    (comp.object)
  • Re: Access module does not continue past the Filter Method
    ... If you get this problem in any database at all, ... the subroutine went back to not working again. ... Public Sub Apply_Tech_Filter ... Debug.Print "Past the Filter" ...
    (microsoft.public.access.modulesdaovba)
  • Re: Lots of Bits
    ... and performance is perhaps increased for the database. ... purist might frown upon it for more theoretical purposes as well as the many ... > match customer filter values with campaign filter values. ...
    (microsoft.public.dotnet.framework.aspnet)
  • Re: Access module does not continue past the Filter Method
    ... I have only seen the problem of "no runtime error messages" in this database. ... Public Sub Apply_Tech_Filter ... Debug.Print "Past the Filter" ...
    (microsoft.public.access.modulesdaovba)
  • Re: Apply filter macro
    ... property to True to make sure the filter is actually being applied. ... > I have two separate database applications with similar ... I have placed a command button on the form ... >>Bryan Reich ...
    (microsoft.public.access.macros)