How can I bind an entity Data Source to the results of a query

Question

I have a query that will go away an and find data

 Dim HSNs As String = String.Join(\",\", ListOfHSNs.Cast(Of String)().ToArray())



        Dim query As S         


        

Answer 1

You can try to use the Selecting EntityDataSource event like in the following example:

Protected Sub EntityDataSource1_Selecting(ByVal sender As Object, ByVal e As EntityDataSourceSelectingEventArgs)
  Dim HSNs As String = String.Join(",", ListOfHSNs.Cast(Of String)().ToArray())
  Dim query As String = "SELECT VALUE O FROM v_BillData AS O WHERE O.HSNumber IN {'" & HSNs & "'}"
  Dim source As EntityDataSource = Nothing
  source = TryCast(Me.Page.FindControl("EntityDataSource1"),EntityDataSource)
  If (Not source Is Nothing) Then
    source.EntitySetName = Nothing
    source.CommandText = query
  End If
End Sub

You should set EntitySetName to Nothing because it will throw an error if you have setup EntityDataSource before.