Foxtable(狐表)用户栏目专家坐堂 → 多个表有同一订单,能不能实现,只修改一个然后根据订单编号,


  共有5526人关注过本帖树形打印复制链接

主题:多个表有同一订单,能不能实现,只修改一个然后根据订单编号,

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/5/14 15:26:00 [显示全部帖子]

Select e.DataCol.Name
    Case "规格","备注"
        If e.NewValue <> e.DataRow.OriginalValue(e.DataCol.Name) Then
            For Each dt As DataTable In DataTables
                If dt.Name.EndsWith("车间") Then
                    Dim dr As DataRow = dt.SQLFind("订单编号 = '" & e.DataRow("订单编号") & "' And 订单编号 Is Not Null")
                    If dr IsNot Nothing Then
                        dr("规格") = e.DataRow("规格")
                        dr("备注") = e.DataRow("备注")
                    End If
                End If
            Next
        End If
End Select

 回到顶部