Заливка Datatable из Linq запроса

Question

я использую ниже код

IEnumerable<DataRow> query = from c in at.appointmentcalendars.AsEnumerable() 
          select c; 

DataTable dt = query.CopyToDataTable(); 

Но я получаю ошибку ниже

Не удается неявно преобразовать Type 'System.Collections.Generic.IEnumerable<appointmentcalendar>' в 'System.Collections.Generic.IEnumerable<System.Data.DataRow>'. явное преобразование существует (вы пропали без вести бросок?)

Answer 1

Поскольку запрос возвращает IEnumerable типа DataRow, вы должны указать, что нужно вставлять в datatable, в данном случае DataRow.

DataTable dt = query.CopyToDataTable<DataRow>(); 

Если вы использовали

var query = //linq query of what you need for new datatable.... 
DataTable dt = query.CopyToDataTable(); 

Ваше имя таблицы дт так выбрать то, что вам нужно от исходного DT

var query = from c in db.something 
      where c.othersomething == "onlyyouknow" 
      orderby c.othersomething 
      select new { NewObject = c.othersomething }; 

DataTable MyDataTable = new DataTable(); 
myDataTable.Columns.Add(
    new DataColumn() 
    { 
     DataType = System.Type.GetType("System.String"),//or other type 
     ColumnName = "Name"  //or other column name 
    } 
); 

foreach (var element in query) 
{ 
    var row = MyDataTable.NewRow(); 
    row["Name"] = element.NewObject; 
    myDataTable.Rows.Add(row); 
} 

Answer 2

at.appointmentcalendars не DataTable. Таким образом, ваш запрос возвращает коллекцию объектов appointmentcalendar, которые нельзя отнести к коллекции DataRow.

Вы должны использовать CopyToDataTable метод из статьи MSDN How to: Implement CopyToDataTable Where the Generic Type T Is Not a DataRow:

IEnumerable<appointmentcalendar> query = at.appointmentcalendars.AsEnumerable(); 
DataTable dt = query.CopyToDataTable(); 

По умолчанию CopyToDataTable() метод работает только с коллекцией DataRow объектов, так что вы не можете использовать его здесь.

Answer 3

Если кто-то нужно решение в VB.net и с функциями агрегации:

Dim MyDataTable As DataTable = New DataTable 
    MyDataTable.Columns.Add("ProviderName", GetType(String)) 
    MyDataTable.Columns.Add("TotalNumSale", GetType(Integer)) 
    MyDataTable.Columns.Add("TotalValSale", GetType(Double)) 

    Dim testquery = (From p In adviceProductData _ 
             Where p.IsOffPanel = False _ 
            Group By p.ProviderName _ 
            Into _ 
            totalNoOfSale = Sum(p.NoOfSales), _ 
            totalValueOfSale = Sum(p.ValueOfSales) 
            Select New With { 
             .ProvName = ProviderName, 
             .TotSale = totalNoOfSale, 
             .TotVal = totalValueOfSale 
             }).ToList() 

    Dim item 
    For Each item In testquery 
     Dim row = MyDataTable.NewRow() 
     row("ProviderName") = item.ProvName 
     row("TotalNumSale") = item.TotSale 
     row("TotalValSale") = item.TotVal 
     MyDataTable.Rows.Add(row) 
    Next 

Answer 4

DataTable getListRow(DataTable dt, int intSndBCode, int intPostManSCode) 
    { 
     IEnumerable<DataRow> results = (from MyRows in dt.AsEnumerable() 
         where 
         MyRows.Field<int>("m_sndBCode") == intSndBCode 
         && 
         MyRows.Field<int>("m_postManSCode") == intPostManSCode 
         select MyRows); 
     DataTable dtNew = results.CopyToDataTable(); 
     return dtNew; 
    }