主题：两个表数据同步删除‘增加

我用的是外部数据源，这样好像不行啊

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("任务名称")
             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

你可以看看这个：

http://www.foxtable.com/help/topics/2490.htm

如果搞不定，就做个简单例子发上来，我们帮你设置一下，以后你照着做。