您现在的位置: 365建站网 > 365学习 > 将一个DataTable分解成多个DataTable

将一个DataTable分解成多个DataTable

文章来源:365jz.com     点击数:286    更新时间:2009-09-19 10:33   参与评论
我们所接触的一个系统在导出数据到Excel的时候,产生了内存溢出的错误。原因在于数据过大,它导出是将所有数据存放在一个DataSet的一个表中,再将这个数据集放入session,在导出功能所在的页面再读取该session的值,并绑定在一个DataGrid,再进行相关导出处理。因为系统不是我们开发的,我们就打算在数据存入session的时候,将数据表分解成多个表存入DataSet,这样在绑定DataGrid并处理的时候,能够一个个table的处理。测试后证明,方法是成功了。下面就把代码一贴,有类似需求的可以大概看看,希望能有所帮助。

C# 代码:

 /// <summary>
        
/// 分解数据表
        
/// </summary>
        
/// <param name="originalTab">需要分解的表</param>
        
/// <param name="rowsNum">每个表包含的数据量</param>
        
/// <returns></returns>
        public DataSet SplitDataTable(DataTable originalTab, int rowsNum)
        {            
            
//获取所需创建的表数量
            int tableNum = originalTab.Rows.Count / rowsNum;

            
//获取数据余数
            int remainder = originalTab.Rows.Count % rowsNum;
            
            DataSet ds 
= new DataSet();

            
//如果只需要创建1个表,直接将原始表存入DataSet
            if (tableNum == 0)
            {
                ds.Tables.Add(originalTab);
            }
            
else
            {
                DataTable[] tableSlice 
= new DataTable[tableNum];
            
                
//Save orginal columns into new table.            
                for (int c = 0; c<tableNum; c++)
                {
                    tableSlice[c] 
= new DataTable();
                    
foreach(DataColumn dc in originalTab.Columns)
                    {                    
                        tableSlice[c].Columns.Add(dc.ColumnName,dc.DataType);                    
                    }
                }                                                            
                
//Import Rows
                for (int i = 0; i < tableNum; i ++)
                {
                    
// if the current table is not the last one
                    if (i != tableNum -1)
                    {
                        
for(int j = i*rowsNum ; j < ((i+1)*rowsNum); j++)
                        {
                            tableSlice[i].ImportRow(originalTab.Rows[j]);
                        }
                    }
                    
else
                    {
                        
for(int k = i*rowsNum ; k < ((i+1)*rowsNum+remainder); k++)
                        {
                            tableSlice[i].ImportRow(originalTab.Rows[k]);
                        }
                    }
                }            
            
                
//add all tables into a dataset                
                foreach(DataTable dt in tableSlice)
                {
                    ds.Tables.Add(dt);
                }
            }
            
return ds;
        }


VB.NET 代码:
  '===============================================================================
    ' Author: Ray Chang
    ' Date: 2007/04/11
    ' Description: This function splits a givin datatabe into several tables and 
    '              create a new dataset to hold these tables. 
    '================================================================================
    Public Function SplitDataTable(ByVal originalTab As DataTable, ByVal rowsNum As IntegerAs DataSet

        
Dim tableNum As Integer = originalTab.Rows.Count \ rowsNum
        
Dim remainder As Integer = originalTab.Rows.Count Mod rowsNum
        
Dim ds As DataSet = New DataSet
        
'if one table is big enough to store, use one table
        If tableNum = 0 Then
            ds.Tables.Add(originalTab)
        
Else

            
Dim tableSlice(tableNum - 1As DataTable

            
'Save orginal columns into new table
            Dim c As Integer
            
For c = 0 To (tableNum - 1)
                tableSlice(c) 
= New DataTable
                
For Each dc As DataColumn In originalTab.Columns
                    tableSlice(c).Columns.Add(dc.ColumnName, dc.DataType)
                
Next
            
Next

            
'Import Rows
            Dim i As Integer
            
For i = 0 To (tableNum - 1)
                
'if the current table is not the last table
                If i <> tableNum - 1 Then
                    
Dim j As Integer
                    
For j = i * rowsNum To (((i + 1* rowsNum) - 1)
                        tableSlice(i).ImportRow(originalTab.Rows(j))
                    
Next
                
Else
                    
Dim k As Integer
                    
For k = i * rowsNum To (((i + 1* rowsNum + remainder) - 1)
                        tableSlice(i).ImportRow(originalTab.Rows(k))
                    
Next
                
End If
            
Next

            
'Add all tables into a dataset        
            For Each dt As DataTable In tableSlice
                ds.Tables.Add(dt)
            
Next
        
End If

        
'return dataset
        SplitDataTable = ds
    
End Function

先用C#写的,可是系统用的却是VB.NET,只能又转成了VB.NET. 整个方法返回一个包含了分解后的table的DataSet, 所传入的参数主要2个:一是所需要分解的表,还有一个是每一个表所包含的数据量,而最后一个表将会包含设定的数据量加上余数。至于转换后如何操作,我就不罗嗦了。

这个方法应用的地方不多,除非特别案例,如果那个系统从开头设计好,估计后期也不用做这种改动。总之贴出来,能用到大家就用吧。
- Ray Chang  2007年4月11日
转自:http://www.cnblogs.com/Rayinuk/archive/2008/11/04/709336.HTML
作者:LiFuyun
出处:http://lifuyun.cnblogs.com
本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。

如对本文有疑问,请提交到交流论坛,广大热心网友会为你解答!! 点击进入论坛


发表评论 (286人查看0条评论)
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
用户名: 验证码: 点击我更换图片
最新评论
------分隔线----------------------------