老师,以下用来更新后台数据时因《出入库明细》表中明细比较多(目前60万条)每次点击保存时好慢,要等3分钟的样子,有什么方法可以优化吗?
For Each dr4 As Row In Tables("出入库明细").Rows
For Each dr As DataRow In dt1.dataRows
Dim drs As List(Of DataRow) = DataTables("出入库明细").sqlSelect("成品编码 = '" & dr("成品编码") & "' and 采购订单号 = '" & dr("采购订单号") & "' and 单据类型 = '入库'")
For Each dr2 As DataRow In drs
dr2("出库数量") = dr("出库数量")
Next
DataTables("出入库明细").SQLUpdate(drs)
Next
Next
DataTables("出入库明细").loadfilter = ""
DataTables("出入库明细").load
DataTables("出入库明细").Save()
[此贴子已经被作者于2022/12/22 13:29:49编辑过]