主题：非关联表数据同步失败

老师，

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:项目.rar

帮我看下这个项目数据同步失败呢？已上传实例

表B，datacolchanged事件

 

Select Case e.DataCol.name
    Case "生产批车次号"
        If e.DataRow.IsNull("卷号") = False Then
            Dim dr As DataRow
            If e.OldValue = Nothing Then
                dr = DataTables("c表").Find("生产批号 = '" & e.NewValue & e.DataRow("卷号") & "'")
            Else
                dr = DataTables("c表").Find("生产批号 = '" & e.oldvalue & e.DataRow("卷号") & "'")
            End If
           
            If dr Is Nothing Then
                dr = DataTables("c表").AddNew()
            End If
            dr("生产批号") = e.NewValue & e.DataRow("卷号")
            dr("母卷号") = e.DataRow("母卷号")
        End If
    Case  "卷号"
        If e.DataRow.IsNull("生产批车次号") = False Then
            Dim dr As DataRow
            If e.OldValue = Nothing Then
                dr = DataTables("c表").Find("生产批号 = '" & e.DataRow("生产批车次号") & e.DataRow("卷号") & "'")
            Else
                dr = DataTables("c表").Find("生产批号 = '" & e.DataRow("生产批车次号") & e.OldValue & "'")
            End If
           
            If dr Is Nothing Then
                dr = DataTables("c表").AddNew()
            End If
            dr("生产批号") = e.DataRow("生产批车次号") & e.DataRow("卷号")
            dr("母卷号") = e.DataRow("母卷号")
        End If
End Select

还是同步不了呢？

 重置列

 

点重置列后，还是不能同步

1、代码写到表BDataColChanged事件；

 

2、重置表B、生产批车次号、卷号 列。

能否实现在C表输入B中某个批号时，才把相关数据同步过来呢？如：在表C录入批号NAC2017090601A03B01时，就会同步这个批号的母卷号过来呢？

 

表C代码

 

Select Case e.DataCol.name
    Case "生产批号"
        Dim dr As DataRow = DataTables("B表").Find("生产出货批号 = '" &  e.newValue & "'")
        If dr IsNot Nothing Then
            e.DataRow("母卷号") = dr("母卷号")
        End If
End Select