[转载]C#.NET DataTable扩展 ToList/Get/OrderBy/Where/ToPage

http://www.cnblogs.com/livexy/archive/2010/07/06/1772213.html

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Reflection;
using System.Data;
using System.Data.Common;
using System.Web.Script.Serialization;
using System.IO;
using System.Security.Cryptography;

namespace Pub.Class {
   
public static class DataTableExtensions {

       
public static List<TResult> ToList<TResult>(this DataTable dt) where TResult : class,new() {  
            List
<TResult> list= new List<TResult>();
           
if (dt == null) return list;
           
int len = dt.Rows.Count;

           
for (int i = 0; i < len; i++) {
                TResult info
= new TResult();
               
foreach (DataColumn dc in dt.Rows[i].Table.Columns) {
                   
if (dt.Rows[i][dc.ColumnName] == null || string.IsNullOrEmpty(dt.Rows[i][dc.ColumnName].ToString())) continue;
                    System.Reflection.PropertyInfo pi
= info.GetType().GetProperty(dc.ColumnName);
                    pi.SetValue(info, dt.Rows[i][dc.ColumnName],
null);
                }
                list.Add(info);
            }
            dt.Dispose(); dt
= null;
           
return list;
        }  
       
public static DataTable OrderBy(this DataTable dt, string orderBy) {
            dt.DefaultView.Sort
= orderBy;
           
return dt.DefaultView.ToTable();
        }
       
public static DataTable Where(this DataTable dt, string where) {
            DataTable resultDt
= dt.Clone();
            DataRow[] resultRows
= dt.Select(where);
           
foreach (DataRow dr in resultRows) resultDt.Rows.Add(dr.ItemArray);
           
return resultDt;
        }
       
public static List<TResult> OrderBy<TResult>(this DataTable dt, string orderBy) where TResult : class,new() {  
           
return dt.OrderBy(orderBy).ToList<TResult>();
        }
       
public static List<TResult> Where<TResult>(this DataTable dt, string where) where TResult : class,new() {  
           
return dt.Where(where).ToList<TResult>();
        }
       
public static List<TResult> ToPage<TResult>(this DataTable dt, int pageIndex,int pageSize,out int totalRecords) where TResult : class,new() {  
            totalRecords
= dt.Rows.Count;
           
int startRow = (pageIndex - 1) * pageSize;
           
int endRow = startRow + pageSize;
           
if (startRow > totalRecords || startRow < 0) { startRow = 0; endRow = pageSize; }
           
if (endRow > totalRecords + pageSize) { startRow = totalRecords - pageSize; endRow = totalRecords; }

            DataTable dt2
= dt.Clone();
           
for (int i = startRow; i < endRow; i++) { if (i >= totalRecords) break; dt2.Rows.Add(dt.Rows[i].ItemArray); }

           
return dt2.ToList<TResult>();
        }

       
public static T Get<T>(this DataRow row, string field) { return row.Get<T>(field, default(T)); }
       
public static T Get<T>(this DataRow row, string field, T defaultValue) {
            var value
= row[field];
           
if(value == DBNull.Value) return defaultValue;
           
return value.ConvertTo<T>(defaultValue);
        }
       
public static T Get<T>(this DataRowView row, string field) { return row.Get<T>(field, default(T)); }
       
public static T Get<T>(this DataRowView row, string field, T defaultValue) {
            var value
= row[field];
           
if(value == DBNull.Value) return defaultValue;
           
return value.ConvertTo<T>(defaultValue);
        }

    }
}

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
在VB.NET中,你可以使用LINQ查询语言将DataTable转换为List。下面是一个示例代码: ```vb Imports System.Data Imports System.Linq Module DataTableExtensions <Extension()> Public Function ToList(Of T)(dataTable As DataTable) As List(Of T) Dim dataList As New List(Of T)() If dataTable IsNot Nothing AndAlso dataTable.Rows.Count > 0 Then For Each row As DataRow In dataTable.Rows Dim obj As T = Activator.CreateInstance(Of T)() For Each prop As Reflection.PropertyInfo In GetType(T).GetProperties() If dataTable.Columns.Contains(prop.Name) AndAlso Not IsDBNull(row(prop.Name)) Then prop.SetValue(obj, Convert.ChangeType(row(prop.Name), prop.PropertyType)) End If Next dataList.Add(obj) Next End If Return dataList End Function End Module ``` 在上述示例中,我们创建了一个扩展方法`ToList`,可以将DataTable转换为指定类型的List。该方法使用反射来动态创建对象,并将DataTable中的数据填充到对象的属性中。 使用示例: ```vb Dim dataTable As New DataTable() dataTable.Columns.Add("ID", GetType(Integer)) dataTable.Columns.Add("Name", GetType(String)) dataTable.Rows.Add(1, "John") dataTable.Rows.Add(2, "Jane") Dim dataList As List(Of Person) = dataTable.ToList(Of Person)() Public Class Person Public Property ID As Integer Public Property Name As String End Class ``` 在上述示例中,我们首先创建了一个包含ID和Name列的DataTable,并添加了两行数据。然后,我们调用`ToList`方法将DataTable转换为`List(Of Person)`,其中`Person`是一个自定义的类,具有ID和Name属性。最后,我们可以使用`dataList`来访问转换后的List。 请注意,要正确地转换DataTableList,确保DataTable的列名与目标类的属性名相匹配,且类型兼容。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值