复制数据越来越慢，不知道问题在哪里 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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))

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

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

主题：复制数据越来越慢，不知道问题在哪里