Foxtable(狐表)用户栏目专家坐堂 → 求助,如果一个表某列增加了值那么另外一个表自动增加一行并增加相应值?


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

主题:求助,如果一个表某列增加了值那么另外一个表自动增加一行并增加相应值?

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


加好友 发短信
等级:幼狐 帖子:150 积分:2096 威望:0 精华:0 注册:2008/9/10 22:48:00
  发帖心情 Post By:2013/7/10 2:32:00 [显示全部帖子]

If e.DataCol.Name = "复核" then
    If e.DataRow.IsNull("实际张数") = False And e.DataRow("复核") = True Then
    Dim dr As DataRow = DataTables("执行").AddNew()
        dr("批次") = e.DataRow("批次")
        dr("板料编码") = e.DataRow("板料编码")
    End If
End If

 回到顶部