Open and filter form results based on 2-criteria

[NewtoAccess]

Hi its me again.

I want to filter data by 2-different values. First I want to filter data by site and then by server. the first value is obtained from a list box-this works fine, then I want the same list filtered by the text "server" in my code.

Must be a syntax error, see below, Thanks

Private Sub addPort_Click()
On Error GoTo Err_addPort_Cli ck

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "devicelist A"

stLinkCriteria = "[SiteID]=" & "'" & Forms!datacente rmain![List0] & "'"
stLinkCriteria = "[Category]=" = Server

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_addPort_Cl ick:
Exit Sub

Err_addPort_Cli ck:
MsgBox Err.Description
Resume Exit_addPort_Cl ick

End Sub

[maxamis4]

so just to understand what you want, You want your search box to find the site first. Then once you have selected the site, you want the same search box to take all the servers from that site and allow you to pick the values from that box?

If this is the case I would not recommend this method at all. Use two boxes and once you select the site hide the first one and make the second display itself. That would be my approach on the filtering. As far as allowing your second list box to display specific information from one site, in the list box source control and include the name of the first list box as the criteria needed to return results. If you can provide more details such as names of controls and tables, I could help you design something that would probably work.


good luck

[NewtoAccess]

Im using a value from a previously selected list box to set criteria-which works however -simultaneously- I would like to filter records based on text I have pretyped code.
The later portion im unable to figure out.

must be my syntax

stLinkCriteria = "[SiteID]=" & Me![SiteID] & "and[Category]="&"switch"

[MMcCarthy]

Try this ...

[code=vb]
stLinkCriteria = "[SiteID]=" & Me![SiteID] & " and [Category]='switch'"
[/CODE]

[NewtoAccess]

It worked fine, Thanks for help!

[MMcCarthy]

It worked fine, Thanks for help!

You're welcome.