示例四

合并文本文件：

Dim mg As New Merger
mg.SourcePath = "c:\\data\\" \'指定数据文件所在目录
mg.Format = "Delimited" \'指定格式
mg.SourceTableName = "订单" \'指定要合并的dbase文件，无需扩展名(此处应该是:指定要合并的文件)

mg.DataTableName = "订单" \'指定接收数据的表
mg.Merge() \'开始合并

合并文本文件的时候，最好配合有schema.ini文件。

示例五

合并Excel文件文件:

Dim mg As New Merger
mg.SourcePath = "c:\\data\\销售管理.xls"
mg.Format = "excel" \'指定格式
mg.SourceTableName = "订单" \'指定要合并的表     (此处应该是:mg.SourceTableName = "订单$")
mg.DataTableName = "订单" \'指定接收数据的表
mg.Merge() \'开始合并