Foxtable(狐表)用户栏目专家坐堂 → 点击重置列后已有的数据不能更新


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

主题:点击重置列后已有的数据不能更新

美女呀,离线,留言给我吧!
DLW77
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:188 积分:1699 威望:0 精华:0 注册:2018/2/26 13:15:00
点击重置列后已有的数据不能更新  发帖心情 Post By:2020/11/30 9:58:00 [只看该作者]

老师,你好,我数据已有的情况下,点击“重置列”更新数据时,已有的数据,在跨表中没有的,他就不会更新。这个代码要怎么改才会更新呢?
If e.DataCol.Name = "订单编号" Then 
    If e.NewValue Is Nothing Then 
        e.DataRow("刷单_退任务价") = Nothing 
    Else
        Dim dr As DataRow
        dr = DataTables("刷单明细").Find("[订单编号] = '" & e.NewValue & "'")
        If dr IsNot Nothing Then 
            e.DataRow("刷单_退任务价") = dr("实付任务金额")
        End If
    End If
End If

图片点击可在新窗口打开查看此主题相关图片如下:更新没变更.png
图片点击可在新窗口打开查看在跨表中是没有这个“订单编号”数据的,之前新增时可能是有,所以退任务价才是159,后来删除了,再点击“重置列”时,退任务价也是159,不会变成空格。


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110560 积分:562690 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/11/30 10:09:00 [只看该作者]

        If dr IsNot Nothing Then 
            e.DataRow("刷单_退任务价") = dr("实付任务金额")
else
            e.DataRow("刷单_退任务价") = nothing
        End If

 回到顶部