复制DataTabe的Rows到另一个DataTable

有时候我们需要将一个DataTable的每一行进行复杂的筛选，然后筛选出来的行要添加到另一个DataTable中：
例如：dt.Rows.Add(dr)   如果dr是来至另一个DataTable,那么会报错：dr已属于另一个DataTable
这是我们需要这样使用：dt.Rows.Add(dr.ItemArray)    相当于复制一个数组出来添加到新的DataTable中


下面是例子，将dt1的数据一行一行的复制到dt2中
dim dt1=ExecuteSelect("SELECT * FROM dual")  
dim dt2=dt1.Clone()

for each dr in dt1.Rows      

    dt2.Rows.Add(dr.ItemArray)
next 

原文地址:http://bbs.delit.cn/thread-649-1-1.html

转载请注明出处;
撰写人:度量科技www.delit.cn

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/328153/viewspace-1981950/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/328153/viewspace-1981950/