以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]导入excel表时,如何能做到原来已导入的内容如果相同则不导入,只导入新增加的内容  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=32481)

--  作者:hrw68529
--  发布时间:2013/5/3 9:01:00
--  [求助]导入excel表时,如何能做到原来已导入的内容如果相同则不导入,只导入新增加的内容
我利用下边一段代码,导入excel表内容,当excel表有部分内容更改后,再导入时,它是在原来数据的基础上,又导入数据,不能覆盖原来没有变的数据,重复导入了,怎么才能第二次导入时,如果原来的内容没改变,就不导入,改变的内容才导入呢。代码如下:

合并Excel文件:

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


--  作者:Bin
--  发布时间:2013/5/3 9:10:00
--  
参考这里做.http://www.foxtable.com/help/topics/2334.htm
加个判断是否满足你需求再导入行即可

--  作者:ybil
--  发布时间:2013/5/3 9:12:00
--  
根据订单表合成合并条件