以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  复制数据越来越慢,不知道问题在哪里  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=144181)

--  作者:erdbeer
--  发布时间:2019/12/12 23:51:00
--  复制数据越来越慢,不知道问题在哪里
Dim Cols1() As String = {"入库日期","客户代码","客户名称","定单号码","品名","件数","数量","单价","长","宽","高","毛重"}
Dim Cols2() As String = {"入库日期","客户代码","客户名称","定单号码","品名","件数","数量","单价","长","宽","高","毛重"}
For Each dr1 As DataRow In DataTables("入库明细").Select("[选择] = true")
  Dim dr2 As DataRow = DataTables("出库明细").AddNew()
  For i As Integer = 0 To Cols1.Length -1
    dr2(Cols2(i)) = dr1(Cols1(i))
  Next
Next

用的是局域网的SQL数据库,大约240行数据,项目刚开始还行,现在运行起来居然需要18分钟左右,不知道问题出在哪里图片点击可在新窗口打开查看

[此贴子已经被作者于2019/12/12 23:51:03编辑过]

--  作者:有点蓝
--  发布时间:2019/12/13 8:59:00
--  
备份项目。注释掉出库明细所有表事件,去掉出库明细所有表达式列的表达式,还慢吗?