示例八
下面是一个批量合并的例子，假定目录c:\data下有多个Excel文件，这些文件都有一个名为订单的表，需要将这些表中的数据批量并到Foxtable的订单表中：
For Each fl As String In FileSys.GetFiles("c:\Data") Dim mg As New Merger mg.SourcePath = fl mg.Format = "excel" '指定格式 mg.SourceTableName = "订单" '指定要合并的表 mg.DataTableName = "订单" '指定接收数据的表 mg.Merge() '开始合并Next
加好友 
发短信
Post By：2014/2/9 8:59:00 [显示全部帖子]
