下面是一个批量合并的例子，假定目录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
-----------------------------------------------------------
但是名字一样，里面也会重名啊，比如订单， 订单（1），订单（2）.......... 能不能不管名字，直接合并里面所有EXCEL的表？如果不行，那么如何解决了？
加好友 
发短信
Post By：2021/1/8 17:21:00 [只看该作者]
