Foxtable(狐表)用户栏目专家坐堂 → 修改与删除数据


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

主题:修改与删除数据

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:19:00 [显示全部帖子]


[此贴子已经被作者于2017/8/12 9:31:19编辑过]

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:34:00 [显示全部帖子]

测试没有问题,选否不会删除,请仔细测试

另外可以去掉同步删除,保留同步更新即可

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:46:00 [显示全部帖子]

我测试没有问题。请重新上传有问题的项目,说明测试步骤

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:54:00 [显示全部帖子]

测试没有问题。说明你的测试步骤

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 9:56:00 [显示全部帖子]

你应该去掉的是客户表和商户表的“同步删除关联”,而不是去掉其它关联表的。

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 10:13:00 [显示全部帖子]

都没有写代码去掉商户ID,去掉的是“客户ID”,当然不会清空了

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 10:36:00 [显示全部帖子]

不需要设置也可以的。

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 11:38:00 [显示全部帖子]

参考删除事件的方式,在datacolchanged进行更新

DataTables("流量卡资料").ReplaceFor("客户ID", e.DataRow("客户ID"), "商户ID= '" & e.DataRow("商户ID") & "'")'

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 14:11:00 [显示全部帖子]

能不能学会理解一下代码,不要别人给一句就抄一句。

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/12 17:10:00 [显示全部帖子]

商品表DataColChanging事件

If e.DataCol.name = "流量卡ID" Then
    Dim dr As DataRow = e.DataTable.Find("流量卡ID='" & e.NewValue & "'" )
    If dr IsNot Nothing Then
        If MessageBox.Show("流量卡ID已绑定其它商户,是否清楚?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes
            dr("流量卡ID") = Nothing
        Else
            e.Cancel=  True
        End If
    End If
End If

DataColChanged事件

If e.DataCol.name = "客户ID" Then
    DataTables("流量卡资料").ReplaceFor("客户ID", e.DataRow("客户ID"), "商户ID= '" & e.DataRow("商户ID") & "'")
End If

 回到顶部
总数 11 1 2 下一页