Foxtable(狐表)用户栏目专家坐堂 → [求助] 跨表自动更新


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

主题:[求助] 跨表自动更新

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


加好友 发短信
等级:三尾狐 帖子:799 积分:5921 威望:0 精华:0 注册:2018/11/3 8:24:00
[求助] 跨表自动更新  发帖心情 Post By:2021/2/13 12:15:00 [显示全部帖子]

老师,我在当前表的表属性中加了以下代吗,当前表从sql下载时带有新记录出来的话,生产任务单表中的 AssemblingFinishingDate没有更新。只有当再去修改当前表中的Date的内容时,才自动更新,这是为什么 ?



Select Case e.DataCol.name
    Case "BarcodeData"
       Dim dr As DataRow = DataTables("生产任务单").Find("生产任务单号 = '" & e.OldValue & "'")
        If dr Is Nothing Then

           dr = DataTables("生产任务单").Find("[生产任务单号] = '" & e.DataRow ("BarcodeData") & "'")
        If dr IsNot Nothing Then 
            dr("AssemblingFinishingDate") = e.DataRow("Date") 
DataTables("生产任务单").save
       End If

        End If
End Select

 回到顶部