从“生产订单.订单明细”表复制当前“提交”=true和“属性”= “生产”的行到“PMC车间计划”表里面,用如下代码实现,现请求大师帮忙修改代码,使其“PMC车间计划”里面“序列号”和“名称”相同的行不在复制,谢谢
If e.DataCol.Name = "提交" AndAlso e.DataRow("提交") = True AndAlso e.DataRow("属性") = "生产" Then
Dim nma() As String = {"序列号","名称","规格","需求数量","属性","计划数量","订单号","产品名称"} 'A表数据来源列
Dim nmb() As String = {"序列号","名称","规格","需求数量","属性","计划数量","订单号","产品名称"} 'B表数据接收列
Dim dr As DataRow = DataTables("PMC车间计划").AddNew
For i As Integer = 0 To nma.Length - 1
dr(nmb(i)) = e.DataRow(nma(i))
Next
End If
请帮忙修改代码,谢谢
[此贴子已经被作者于2019/6/21 16:34:50编辑过]