你好!请教一下 非关联表之间的数据同步,数据全部能同步,但同步删除时仅删除了商品编号,其他的删除不了?
DataColChanged事件代码
Select Case e.DataCol.name
Case "商品编码"
Dim dr As DataRow = DataTables("库存明细").Find("商品编码 = '" & e.OldValue & "'")
If dr Is Nothing Then
dr = DataTables("库存明细").AddNew()
dr("商品编码") = e.DataRow("商品编码")
dr("商品类别") = e.DataRow("商品类别")
dr("商品名称") = e.DataRow("商品名称")
dr("规格型号") = e.DataRow("规格型号")
Else
dr("商品编码") = e.DataRow("商品编码")
End If
Case "商品名称","规格型号","商品类别"
Dim dr As DataRow = DataTables("库存明细").Find("商品编码 = '" & e.DataRow("商品编码") & "'")
If dr IsNot Nothing Then
dr(e.DataCol.Name) = e.DataRow(e.DataCol.Name)
End If
End Select
DataRowDeleting事件代码
Dim dr As DataRow = DataTables("库存明细").Find("商品编码 = '" & e.DataRow("商品编码") & "'" )
If dr IsNot Nothing Then
dr.Delete()
End If