数据引用参考：http://www.foxtable.com/help/topics/1451.htm
http://www.foxtable.com/help/topics/1453.htm
至于表B新增商品复制到表A,可以这样：
导入数据的代码
.....
.....
DataTables("表A").DataCols("列名").RaiseDataColChanged() '重置触发列，从表B提取金额等信息
For each dr As DataRow in DataTables("表B")
dim dr2 As DataRow = Dtatables("表A").Find("商品编号 = '" & dr("商品编号") & "'")
if dr2 is nothing then
dr2 = Dtatables("表A").AddNew
dr2("商品编号") = dr("商品编号")
dr2("其他列1") = dr("其他列1")
dr2("其他列1") = dr("其他列1")
end if
next
[此贴子已经被作者于2015/4/12 20:25:58编辑过]
加好友 
发短信
Post By：2015/4/12 20:26:00 [显示全部帖子]
