applying a filter to report (1 Viewer)

smig · Jan 24, 2019

I'm trying to apply a filter to report OnOpen. and something is getting wrong :banghead:
I keep getting an error message:
2101 - Setting a wrong property

Code:

Private Sub Report_Open(Cancel As Integer)

Dim strFilter As String

strFilter = "[LakoachID] = " & GetLakoachID() & " OR [LakoachRashiID] = " & GetLakoachID() & " OR [LakoachID] = 11615 "

Me.Filter = strFilter
Me.FilterOn = True

End Sub

the GetLakoachID() exist and return a long var

this will return the same error
strFilter = "[LakoachID] = 11615 OR [LakoachRashiID] = 11615 OR [LakoachID] = 11615 "

isladogs · Jan 24, 2019

You have used the same field twice

Code:

strFilter = "[LakoachID] = 11615 OR [LakoachRashiID] = 11615 [B][COLOR="Red"]OR [LakoachID] = 11615 [/COLOR][/B]"

Also FWIW, you have a space at the end & the [] aren't required ...but neither are causing any issues here

MajP · Jan 24, 2019

are both [LakoachID] and [LakoachRashiID] defined as numeric fields at that table level?

smig · Jan 24, 2019

isladogs said:
You have used the same field twice

Code:

strFilter = "[LakoachID] = 11615 OR [LakoachRashiID] = 11615 [B][COLOR="Red"]OR [LakoachID] = 11615 [/COLOR][/B]"

Also FWIW, you have a space at the end & the [] aren't required ...but neither are causing any issues here

I know i used the same ID twice.
It was just for a test

I also tried without the []

smig · Jan 24, 2019

MajP said:
are both [LakoachID] and [LakoachRashiID] defined as numeric fields at that table level?

Yes, they are

isladogs · Jan 24, 2019

What is the code for the function GetLakoachID?

Also perhaps you have some corruption. Try decompiling your DB

smig · Jan 24, 2019

even if I try Me.Filter = "" I get the same error

bastanu · Jan 24, 2019

What happens if you try to use the Docmd.OpenReport with a where clause (https://www.access-programmers.co.uk/forums/showthread.php?t=205231), do you still get the error?

Cheers,
Vlad

June7 · Jan 24, 2019

Agree, apply filter in OpenReport method instead of trying to filter report in Open event.

smig · Jan 24, 2019

I can't use the Docmd.OpenReport,as this is a Sub report

smig · Jan 24, 2019

If nothing works I'll modify the recordSource instead

bastanu · Jan 24, 2019

Try to use the master/child to link it to the main report or apply the where clause to its record source.

pbaldy · Jan 24, 2019

I've used similar code and never seen that error. Something is wonky if this is behind a report. If Colin's suggestion of a decompile doesn't work, you might also try:

http://allenbrowne.com/ser-47.html#SaveAsText

isladogs · Jan 24, 2019

smig said:
If nothing works I'll modify the recordSource instead

Did you notice my comments in post #6?

smig · Jan 24, 2019

isladogs said:
Did you notice my comments in post #6?

Yes, I did
Compact and Repair did not help

Gasman · Jan 24, 2019

smig said:
Yes, I did
Compact and Repair did not help

Decompile was mentioned?

isladogs · Jan 24, 2019

Compacting rarely helps with this type of issue.
Decompiling often works which is why I suggested that!

I also asked about your function

Uncle Gizmo · Jan 24, 2019

In your Subreport property sheet, have you manually cleared the filter? Have you also manually set the "Filter On Load" to"NO"

applying a filter to report (1 Viewer)

smig

Registered User.

isladogs

MVP / VIP

MajP

You've got your good things, and you've got mine.

smig

Registered User.

smig

Registered User.

isladogs

MVP / VIP

smig

Registered User.

bastanu

AWF VIP

June7

AWF VIP

smig

Registered User.

smig

Registered User.

bastanu

AWF VIP

pbaldy

Wino Moderator

isladogs

MVP / VIP

smig

Registered User.

Gasman

Enthusiastic Amateur

isladogs

MVP / VIP

Uncle Gizmo

Nifty Access Guy

Similar threads

Users who are viewing this thread