- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 点击重置列后已有的数据不能更新 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=158706)
-- 发布时间：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，不会变成空格。-- 发布时间：2020/11/30 10:09:00
--
If dr IsNot Nothing Then
e.DataRow("刷单_退任务价") = dr("实付任务金额")
else
e.DataRow("刷单_退任务价") = nothing
End If