[求助]关于合并导入Excel代码优化 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于合并导入Excel代码优化

共有4678人关注过本帖树形打印复制链接主题：[求助]关于合并导入Excel代码优化

Bin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/4 8:27:00 [显示全部帖子]

大量的并且多条件的 sqlFind 效率肯定不会高

如果是外部数据源,可以设置一下索引看看.

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/4 9:32:00 [显示全部帖子]

主要耗时应该在FIND条件上.尝试

dt.find("窑号 =''")

Dim bh As String = "窑号 ='" & arrTemp(n,0).Text & "' and 窑洞 = " & arrTemp(n,1).Text & " and 数量 = " & arrTemp(n,3).Text & " and 出窑人 = '" & arrTemp(n,5).Text & "' and 验收时间 = #" & arrTemp(n,6).Text & "# and 商品名 = '" & arrTemp(n,2).Text & "'"

f dt.Find(bh) Is Nothing Then '如果不存在同编号的订单