fields指的是数据源的列。
Dim mg As New Merger
mg.SourcePath = "d:\问题\123.xls"
mg.Format = "excel" '指定格式
mg.SourceTableName = "订单$" '指定要合并的表
mg.DataTableName = "订单" '指定接收数据的表
mg.Fields = "产品1,雇员1"
mg.FieldMaps.Add("产品1", "产品")
mg.FieldMaps.Add("雇员1", "雇员")
mg.Merge() '开始合并
- Fields
指定要合并的字段(列)，不同的字段用逗号隔开，如果不指定，则合并所有字段。
DataTableName
指定接收合并数据的数据表的名称，这个表必须是当前项目中已经存在的表。
Header
逻辑型，如果合并的是文本文件，用此属性指定第一行是否是列名称。
FieldMaps
这是一个集合，要合并的表和接收数据的表的字段名称存在不一致的情况下，可以用此集合指定两个表之间字段的对应关系。
假定要合并的表中某一字段的名称为“ID”，合并的时候，需要将该列的内容合并到接收表中的"编号"列，可以设置代码：
Dim mg As New Merger
mg.FieldMaps.Add("ID","编号")
加好友 
发短信
Post By：2024/5/18 15:27:00 [显示全部帖子]
