就像这样:
下面是一个批量合并的例子,假定目录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
类似的功能,只是变成是合并录音文件进去,而不是一列文字数据
[此贴子已经被作者于2014-3-5 20:16:16编辑过]