Salve a tutti vorrei eseguire un CopyToDataTable utilizzando il codice sottoindicato ma non riesce ad espormi il metodo CopyToDataTable per query mi sapreste indicare il perche ?

Dim numberGroupsCC = From n In tb2.AsEnumerable _
Where n!tipo_doc = "CC" _
Group n By n!cod_prod, n!descr_mer, n!qta, n!tipo_doc, n!cat_mer, _
n!descr, n!cod_rep_pos_new Into _
Group Select cod_prod = cod_prod, descr_mer = descr_mer, _
qta = CType(Group.Sum(Function(n) CType(n!qta, Double)), Double), _
totale = CType(Group.Sum(Function(n) CType(n!totale, _ Double)),Double), _
tipo_doc, cat_mer, descr, cod_rep_pos_new

Dim query = From cc In tb2.AsEnumerable _
Select New With {cc!cod_prod}

Dim tb_QryljoinCC As DataTable = query.CopyToDataTable

Saluti fdibenedetto

Ciao Alessandro , grazie per averimi risposto
si certo , ho aggiunto
questi .
Imports System
Imports System.Data
Imports System.Data.DataTableExtensions
Imports System.Data.SqlClient
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.IO
Imports System.Linq
Imports System.Configuration
Imports System.Linq.Enumerable
Imports System.Linq.Expressions
Imports System.Collections.Generic

e quindi come posso fare per avere in una datatable un'aggregazione ed una serie di campi ?