openReport

[bryonone]

Trying to open a report with multiple WHEREconditions. I have 4 strings (SelA, SelB, SelC, whereStr) all defined as strings.

SelA, SelB SelC all pieces of the whereStr

If I set whereStr = {any of the individual strings A,B or C}, the following works

DoCmd.OpenReport "rptName", acViewReport , , whereStr

When I try to concatenate the stings into 'whereStr', I only get the first string listed in the report.

Anyone? Help?

[cactusdata]

Concatenate? How? They are there already: SelA, SelB SelC all pieces of the whereStr

And do you wish to filter on four fields or one field?

[bryonone]

If I set
whereStr=SelA
It works fine

how do I get the whereStr to be equal to SelA, SelB, and SelC.

I want to filter on all 3 fields.

Any thoughts?

[cactusdata]

Try with:

whereStr = SelA & " And " & SelB & " And " & SelC

[bryonone]

I had tried that before. It only recognizes the first string and ignores the rest. I just tried again triple checking the & and "". Still does not work.

I also tried in the 'WHERE" entry,
SelA + SelB + SelC

[cactusdata]

Without the content of SelA, B, and C, we can't help.

[bryonone]

Dim SelLic, SelSW, SelArea As String
Dim whereStr As String
 
SelLic = "[swLicName]= Forms![frmViewLicToLoc]![txtSelectedLicense] _
    OR Forms![frmViewLicToLoc]![txtSelectedLicense] is null _
    OR Forms![frmViewLicToLoc]![txtSelectedLicense]=''"
 
SelSW = "[swName]=Forms![frmViewLicToLoc]![txtSelectedSW] _
    OR Forms![frmViewLicToLoc]![txtSelectedSW] is null _
    OR Forms![frmViewLicToLoc]![txtSelectedSW]=''"
 
SelArea = "[areaLocation] = Forms![frmViewLicToLoc]![txtSelectedArea] _
    OR Forms![frmViewLicToLoc]![txtSelectedArea] is null _
    OR Forms![frmViewLicToLoc]![txtSelectedArea]=''"
 
    whereStr = SelSW
 
    DoCmd.OpenReport "rptViewSearch", acViewReport, , whereStr

[isladogs]

Suggest you look at the code in the two example Databases from my article Multiple Group and Filter.
These are designed to show ways of building filter criteria when several filter criteria are entered

[cactusdata]

Try reducing these like:

SelLic = "[swLicName] = Nz(Forms![frmViewLicToLoc]![txtSelectedLicense], [swLicName])"

[NeoPa]

Hi Bryon.

I would suggest you're getting in your own way here. Massively overcomplicating what should be fundamentally straightforward. See How to Debug SQL String for how to make this much easier for yourself. I suspect once you start following this simple guidance you will no longer need any external help.

Can we assume that you understand and recognise how a WHERE clause is formatted and works within SQL (SQL format closely matches what is expected in the WhereCondition parameter that we're talking about here from your code.)? If not then we have to look at some very basic work with you, but as you'll already have seen, we have many willing helpers who can do that as long as they realise it's necessary.

I suspect once we stop following you round in circles we can reach a solution that not only works for you, but also one that you'll understand and be able to use in future.

Best of luck & welcome to Bytes.com.