2

我在我的数据库的表中创建了一个包含一些列名的下拉列表。当用户选择列名时，我想在查询中添加 where 子句以使用此过滤器。

我想做的是：

Dim objQuery = (From wc In _dbBellen.dealer_telefonies Order By wc.Bedrijfsnaam Select wc)

'if dropdown has value...

objQuery = objQuery.Where(Function(wc) wc.DynamicColumnName < txtFilterValue1.Text)

wc.DynamicColumnName 必须替换为例如 wc.Price。

--

在一些回复后我现在尝试的代码是：

    Dim objQuery = (From wc In _dbBellen.dealer_telefonies Order By wc.Bedrijfsnaam Select wc)

        If ddlFilterColumn1.SelectedValue <> "" And ddlFilterOperator1.SelectedValue <> "" And txtFilterValue1.Text <> "" Then

            Select Case ddlFilterOperator1.SelectedValue
                Case "..%"
                    objQuery = objQuery.Where(Function(wc) wc.WHMCSClient_id Like txtFilterValue1.Text & "%")
                Case "%.."
                    objQuery = objQuery.Where(Function(wc) wc.WHMCSClient_id Like "%" & txtFilterValue1.Text)
                Case Else '< > = <>
                    'objQuery = objQuery.Where(Function(wc) wc.WHMCSClient_id < txtFilterValue1.Text)
                    'objQuery = objQuery.Where(Function(wc) "wc." + ddlFilterColumn1.SelectedValue.ToString + " < " + txtFilterValue1.Text)
                    objQuery = objQuery.Where(Function(wc) "wc.WHMCSClient_id < 500")
            End Select

        End If

    Response.Write(objQuery.ToString())

但我收到以下错误（原始错误是荷兰语，但说明如下）：从字符串 wc.WHMCSClient_id < 500 到类型布尔值的转换无效。

4

1 回答 1

2

这是一篇相当老的文章，但我认为它仍然可行

Scott Gu 不久前发布了关于动态 LINQ 库的帖子，它本质上允许您使用字符串以“LINQ”类型格式查询集合。例如：

Dim objQuery = (From wc In _dbBellen.dealer_telefonies Order By wc.Bedrijfsnaam Select wc)

// if dropdown has value...
Dim result = objQuery.Where("MyColumnName < " + txtFilterValue1.Text);

这是完整文章的链接：Dynamic LINQ（第 1 部分：使用 LINQ 动态查询库）

于 2012-07-04T15:30:32.890 回答