-
How to Convert List to DataTable in C# and VB.NET
almost 9 years ago
-
over 7 years ago
Muchas gracias me ayudo a converti mi lista en datatable. saludos desde Bolivia -
almost 9 years ago
In this blog I described how to convert list objects to DataTable. There are several method to convert list objects to DataTable. In this blog I used List interface for conversion.
It is a generic method, it converts all types of list into DataTable. <T> defines the type of list.
Generic method:
private DataTable ConvertToDataTable<T>(IList<T> list){Type entityType = typeof(T);DataTable table = new DataTable();PropertyDescriptorCollection properties =TypeDescriptor.GetProperties(entityType);foreach (PropertyDescriptor prop in properties)table.Columns.Add(prop.Name, Nullable.GetUnderlyingType(prop.PropertyType) ?? prop.PropertyType);foreach (T item in list){DataRow row = table.NewRow();foreach (PropertyDescriptor prop in properties)row[prop.Name] = prop.GetValue(item) ?? DBNull.Value;table.Rows.Add(row);}return table;}
private DataTable ConvertToDataTable<T>(IList<T> list)
{
Type entityType = typeof(T);
DataTable table = new DataTable();
PropertyDescriptorCollection properties =
TypeDescriptor.GetProperties(entityType);
foreach (PropertyDescriptor prop in properties)
table.Columns.Add(prop.Name, Nullable.GetUnderlyingType(prop.PropertyType) ?? prop.PropertyType);
foreach (T item in list)
{
DataRow row = table.NewRow();
foreach (PropertyDescriptor prop in properties)
row[prop.Name] = prop.GetValue(item) ?? DBNull.Value;
table.Rows.Add(row);
}
return table;
}
Generic method:
Private Function ConvertToDataTable(Of T)(list As IList(Of T)) As DataTableDim entityType As Type = GetType(T)Dim table As New DataTable()Dim properties As PropertyDescriptorCollection = TypeDescriptor.GetProperties(entityType)For Each prop As PropertyDescriptor In propertiestable.Columns.Add(prop.Name, If(Nullable.GetUnderlyingType(prop.PropertyType), prop.PropertyType))NextFor Each item As T In listDim row As DataRow = table.NewRow()For Each prop As PropertyDescriptor In propertiesrow(prop.Name) = If(prop.GetValue(item), DBNull.Value)Nexttable.Rows.Add(row)NextReturn tableEnd Function
Private Function ConvertToDataTable(Of T)(list As IList(Of T)) As DataTable
Dim entityType As Type = GetType(T)
Dim table As New DataTable()
Dim properties As PropertyDescriptorCollection = TypeDescriptor.GetProperties(entityType)
For Each prop As PropertyDescriptor In properties
table.Columns.Add(prop.Name, If(Nullable.GetUnderlyingType(prop.PropertyType), prop.PropertyType))
Next
For Each item As T In list
Dim row As DataRow = table.NewRow()
For Each prop As PropertyDescriptor In properties
row(prop.Name) = If(prop.GetValue(item), DBNull.Value)
Next
table.Rows.Add(row)
Next
Return table
End FunctionHope this code will help you. Thanks
over 7 years ago
1 Comment(s)