Question

我有webapplication，其中有1000种产品，因此需要有多个过滤器需要。我有4个checkboxList。现在我的问题是，如果我从任何checkboxList应用过滤器，那么它会检查查询中指定的所有列的选定值。我想要的就像下面的

SELECT * FROM products WHERE price_rang IN ('selectedValueFromCheckBoxList1') And category IN ('selectedValueFromCheckBoxList2')

现在发生了什么

SELECT * FROM `products` WHERE price_range IN ('selectedValueFromCheckBoxList2') AND category IN ('selectedValueFromCheckBoxList2')

所以在这个查询中假设如果我从checkboxList2中选择值First，那么对于这两个列，它取值＆amp;结果没有显示。

以下是我的过滤器流程代码

Private Sub getResult()
        Dim constr As String = ConfigurationManager.ConnectionStrings("conio").ConnectionString
        Dim query As String = "select * from products"

        Dim condition As String = String.Empty
        For Each price As ListItem In priceFilter.Items
            condition += If(price.Selected, String.Format("'{0}',", price.Value), String.Empty)
        Next

        For Each sub_category As ListItem In category.Items
            condition += If(sub_category.Selected, String.Format("'{0}',", sub_category.Value), String.Empty)
        Next

        If Not String.IsNullOrEmpty(condition) Then
            condition = String.Format(" WHERE price_range IN ({0}) and sub_category IN ({0})", condition.Substring(0, condition.Length - 1))
        End If

        Using con As New MySqlConnection(constr)
            Using cmd As New MySqlCommand(query & condition)
                Using sda As New MySqlDataAdapter(cmd)
                    cmd.Connection = con
                    Using dt As New DataTable()
                        sda.Fill(dt)
                        products.DataSource = dt
                        products.DataBind()
                    End Using
                End Using
            End Using
        End Using
    End Sub

Answer 1

这是一个选项，您只对选中的项目感兴趣。

Public Function buildWhereClause() As String

        Dim query As String = "select * from products"
        Dim joiner As String = " "

        Dim condition As String = String.Empty
        Dim priceCondition As String = String.Empty

        For i = 0 To priceFilter.Items.Count - 1

            If priceFilter.Items(i).Selected Then
                Dim price As String = priceFilter.Items(i).ToString
                priceCondition = String.Concat(priceCondition, joiner, String.Format("'{0}'", price))
                If joiner = " " Then joiner = ", "
            End If
        Next

        Dim categoryCondition As String = String.Empty
        joiner = " "

        For i = 0 To categoryFilter.Items.Count - 1
            If categoryFilter.Items(i).Selected Then
                Dim category As String = categoryFilter.Items(i).ToString
                categoryCondition = String.Concat(categoryCondition, joiner, String.Format("'{0}'", category))
                If joiner = " " Then joiner = ", "
            End If
        Next

        Dim whereClause As String = String.Empty
        joiner = " where "
        If Not String.IsNullOrEmpty(priceCondition) Then
            whereClause = String.Concat(whereClause, joiner, String.Format(" price_range IN ({0})", priceCondition)) ' and sub_category IN ({0})", condition.Substring(0, condition.Length - 1))
            joiner = " and "
        End If

        If Not String.IsNullOrEmpty(categoryCondition) Then
            whereClause = String.Concat(whereClause, joiner, String.Format(" sub_category in ({0})", categoryCondition))
            joiner = " and "
        End If

        Return String.Concat(query, whereClause)

    End Function

应用来自多个checkboxList的过滤器来过滤VB.net中的ListView

1 个答案: