G
Guest
I have the following code in a similar database and it allows my dialog box
to work as a search function for as many or few criteria as my users would
like to enter. But when I tried to use the same format in my new database it
does not filter, but just pulls up all the results. I don't understand why?
DoCmd.OpenForm "BTT"
Forms!BTT.RecordSource = "SELECT BTT.[Name], BTT.[Gender], BTT.[Ethnicity],
BTT.[Age], BTT.[Industry], BTT.[Address], BTT.[Home Number], BTT.[Work
Number], BTT.[Cell Number], BTT.[Fax Number], BTT., BTT.[Biography],
BTT.[Strengths], BTT.[Weaknesses], BTT.[Company], BTT.[Title] " _
& "FROM BTT WHERE (BTT.[Name]=[Forms]![BTT Search]![BTT Name] OR
[Forms]![BTT Search]![BTT Name] IS NULL) AND (BTT.[Gender]=[Forms]![BTT
Search]![Gender] OR [Forms]![BTT Search]![Gender] IS NULL) AND (BTT.[Age]
BETWEEN '0' AND '12'=[Forms]![BTT Search]![Kids] OR [Forms]![BTT
Search]![Kids] IS NULL) AND (BTT.[Age] BETWEEN '10' AND '12'=[Forms]![BTT
Search]![Tweens] OR [Forms]![BTT Search]![Tweens] IS NULL) AND (BTT.[Age]
BETWEEN '12' AND '18'=[Forms]![BTT Search]![Teens] OR [Forms]![BTT
Search]![Teen] IS NULL) AND (BTT.[Age] BETWEEN '18' AND '22'=[Forms]![BTT
Search]![College] OR [Forms]![BTT Search]![College] IS NULL) AND (BTT.[Age]
BETWEEN '23' AND '30'=[Forms]![BTT Search]![YA] OR [Forms]![BTT Search]![YA]
IS NULL) AND (BTT.[Age] BETWEEN '30' AND '39'=[Forms]![BTT Search]![Thirty]
OR [Forms]![BTT Search]![Thirty] IS NULL) " _
& "AND (BTT.[Age] BETWEEN '40' AND '49'=[Forms]![BTT Search]![Forty] OR
[Forms]![BTT Search]![Forty] IS NULL) AND (BTT.[Age] BETWEEN '50' AND
'100'=[Forms]![BTT Search]![Over the Hill] OR [Forms]![BTT Search]![Over the
Hill] IS NULL) AND (BTT.[Industry]=[Forms]![BTT Search]![Industy] OR
[Forms]![BTT Search]![Industry] IS NULL) "
DoCmd.Close acForm, Me.Name
End Sub
to work as a search function for as many or few criteria as my users would
like to enter. But when I tried to use the same format in my new database it
does not filter, but just pulls up all the results. I don't understand why?
DoCmd.OpenForm "BTT"
Forms!BTT.RecordSource = "SELECT BTT.[Name], BTT.[Gender], BTT.[Ethnicity],
BTT.[Age], BTT.[Industry], BTT.[Address], BTT.[Home Number], BTT.[Work
Number], BTT.[Cell Number], BTT.[Fax Number], BTT., BTT.[Biography],
BTT.[Strengths], BTT.[Weaknesses], BTT.[Company], BTT.[Title] " _
& "FROM BTT WHERE (BTT.[Name]=[Forms]![BTT Search]![BTT Name] OR
[Forms]![BTT Search]![BTT Name] IS NULL) AND (BTT.[Gender]=[Forms]![BTT
Search]![Gender] OR [Forms]![BTT Search]![Gender] IS NULL) AND (BTT.[Age]
BETWEEN '0' AND '12'=[Forms]![BTT Search]![Kids] OR [Forms]![BTT
Search]![Kids] IS NULL) AND (BTT.[Age] BETWEEN '10' AND '12'=[Forms]![BTT
Search]![Tweens] OR [Forms]![BTT Search]![Tweens] IS NULL) AND (BTT.[Age]
BETWEEN '12' AND '18'=[Forms]![BTT Search]![Teens] OR [Forms]![BTT
Search]![Teen] IS NULL) AND (BTT.[Age] BETWEEN '18' AND '22'=[Forms]![BTT
Search]![College] OR [Forms]![BTT Search]![College] IS NULL) AND (BTT.[Age]
BETWEEN '23' AND '30'=[Forms]![BTT Search]![YA] OR [Forms]![BTT Search]![YA]
IS NULL) AND (BTT.[Age] BETWEEN '30' AND '39'=[Forms]![BTT Search]![Thirty]
OR [Forms]![BTT Search]![Thirty] IS NULL) " _
& "AND (BTT.[Age] BETWEEN '40' AND '49'=[Forms]![BTT Search]![Forty] OR
[Forms]![BTT Search]![Forty] IS NULL) AND (BTT.[Age] BETWEEN '50' AND
'100'=[Forms]![BTT Search]![Over the Hill] OR [Forms]![BTT Search]![Over the
Hill] IS NULL) AND (BTT.[Industry]=[Forms]![BTT Search]![Industy] OR
[Forms]![BTT Search]![Industry] IS NULL) "
DoCmd.Close acForm, Me.Name
End Sub