LINQ查询中动态列名的where子句？

Question

我在我的数据库的表中创建了一个包含一些列名的下拉列表。当用户选择列名时，我想在查询中添加 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

Answer 1

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

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 (Part 1: Using the LINQ Dynamic Query Library)