Foxtable(狐表)用户栏目专家坐堂 → [求助]行保存后,再执行DataColChanged


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

主题:[求助]行保存后,再执行DataColChanged

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


加好友 发短信
等级:三尾狐 帖子:660 积分:5180 威望:0 精华:0 注册:2019/7/26 12:54:00
[求助]行保存后,再执行DataColChanged  发帖心情 Post By:2020/6/12 15:11:00 [只看该作者]

网络编号,生成临时编号,就执行下面代码在 中间表 新增行,不是想要的效果。如何加一个 新增行保存后,再执行下面代码
Select Case e.DataCol.name
    Case "计划编号","成果编号"
        If e.DataRow.IsNull("计划编号") = False AndAlso e.DataRow.IsNull("成果编号") = False Then
            Dim fdr As DataRow = DataTables("中间表").Find("计划编号 = '" & e.DataRow("计划编号") & "' and 成果编号 = '" & e.DataRow("成果编号") & "'")
            If fdr Is Nothing Then
                Dim ndr As DataRow = DataTables("中间表").addnew
                ndr("计划编号") = e.DataRow("计划编号")
                ndr("成果编号") = e.DataRow("成果编号")
            End If
        End If
End Select

[此贴子已经被作者于2020/6/12 15:11:01编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/12 15:46:00 [只看该作者]

这个意思?

            If fdr Is Nothing Then
                Dim ndr As DataRow = DataTables("中间表").addnew
                ndr("计划编号") = e.DataRow("计划编号")
                ndr("成果编号") = e.DataRow("成果编号")
ndr.save
            End If

 回到顶部
帅哥哟,离线,有人找我吗?
miaoqingqing
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:5180 威望:0 精华:0 注册:2019/7/26 12:54:00
回复:(有点蓝)这个意思?      &nbs...  发帖心情 Post By:2020/6/12 16:41:00 [只看该作者]

不是,1楼代码是,成果台账,新增行时,网络编号生成临时成果编号,中间表就新增行,生成临时成果编号,不是想要的结果。想实现成果台账行保存后,固定的成果编号,才在中间表生成

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107718 积分:547917 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/12 16:46:00 [只看该作者]

在DataRowAdded事件中设置代码:

e.DataRow.Save()

[此贴子已经被作者于2020/6/12 16:45:46编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
miaoqingqing
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:5180 威望:0 精华:0 注册:2019/7/26 12:54:00
回复:(有点蓝)在DataRowAdded事件中设置代码:e.Da...  发帖心情 Post By:2020/6/12 16:57:00 [只看该作者]

上楼代码放在 成果台账 表,还是 中间表?

我是想 加一个判断,成果台账,当前行,判断如果已经保存,再执行1楼代码
不懂怎么加这个判断

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

参考:http://www.foxtable.com/webhelp/topics/0428.htm

if e.DataRow.RowState = DataRowState.Unchanged then


 回到顶部