Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]系统增加删除行日志求助


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

主题：[求助]系统增加删除行日志求助
帅哥哟，离线，有人找我吗？
有点色
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/1/4 17:01:00 [只看该作者]

 

Dim r As Row = Tables("表A").Current

Dim s As String = r("第一列") & " " & r("第二列")

ClipBoard.SetText(s)
 回到顶部
帅哥哟，离线，有人找我吗？
abc2363360
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：139 积分：1145 威望：0 精华：0 注册：2016/11/22 8:50:00 		先谢谢了，一会测试一下。  发帖心情 Post By：2017/1/4 17:31:00 [只看该作者]

先谢谢了，一会测试一下。

 回到顶部
帅哥哟，离线，有人找我吗？
abc2363360
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：139 积分：1145 威望：0 精华：0 注册：2016/11/22 8:50:00 		帮我看看如何把全局表事件DataColChanged对表A无效  发帖心情 Post By：2017/1/5 10:29:00 [只看该作者]

For Each dt As DataTable In DataTables
    dt.GlobalHandler.DataColChanged = True '开启全局表事件DataColChanged
    dt.GlobalHandler.BeforeDeleteDataRow = True  '开启全局表事件BeforeDeleteDataRow
    dt.GlobalHandler.DataRowAdded = True  '开启全局表事件DataRowAdded
Next

麻烦大神帮我看看如何用以上代码把全局表事件DataColChanged对表A无效


Dim r0 As Row = Tables("本地服务热线客服预处理过程记录表").Current
If r0 IsNot Nothing
    If r0("是否派单") = "否"  Then '如果点派单则检查是否派单,如果选择了否,则修改为是
        r0("是否派单") = "是"
    End If
End If

麻烦大神帮我看看如何用以上代码把检测  是否派单  内容是  空或否  点击后都把是否派单  内容修改为  是  
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/1/5 10:35:00 [只看该作者]

1、

 

For Each dt As DataTable In DataTables
    If dt.Name <> "表A" Then
       dt.GlobalHandler.DataColChanged = True '开启全局表事件DataColChanged
        dt.GlobalHandler.BeforeDeleteDataRow = True  '开启全局表事件BeforeDeleteDataRow
        dt.GlobalHandler.DataRowAdded = True  '开启全局表事件DataRowAdded
    End If
Next
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/1/5 10:37:00 [只看该作者]

Dim r0 As Row = Tables("本地服务热线客服预处理过程记录表").Current
If r0.IsNull("是否派单") OrElse r0("是否派单") = "否"  Then
    r0("是否派单") = "是"
End If
 回到顶部
帅哥哟，离线，有人找我吗？
abc2363360
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：139 积分：1145 威望：0 精华：0 注册：2016/11/22 8:50:00 		谢谢，代码都正确搞好了！  发帖心情 Post By：2017/1/5 10:50:00 [只看该作者]

谢谢，代码都正确搞好了！

 回到顶部
帅哥哟，离线，有人找我吗？
XINYUEMIN
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：146 积分：1301 威望：0 精华：0 注册：2018/1/26 9:23:00 		  发帖心情 Post By：2018/2/26 11:04:00 [只看该作者]

我按照上面的代码复制的 为什么没有产生记录？

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/2/26 11:42:00 [只看该作者]

以下是引用XINYUEMIN在2018/2/26 11:04:00的发言：
我按照上面的代码复制的 为什么没有产生记录？

 

看14楼，开启全局表事件了没有？

 

或者先看看

 

下载信息  [文件大小：312.0 KB  下载次数：22]
图片点击可在新窗口打开查看点击浏览该文件:操作日志2017.table

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
XINYUEMIN
 小大  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：146 积分：1301 威望：0 精华：0 注册：2018/1/26 9:23:00 		  发帖心情 Post By：2018/2/26 13:28:00 [只看该作者]

项目事件填到保存那里了  已经解决 谢谢老师
 回到顶部
帅哥哟，离线，有人找我吗？
playmal
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1566 积分：12879 威望：0 精华：0 注册：2009/6/16 7:30:00 		  发帖心情 Post By：2019/3/10 19:19:00 [只看该作者]

删除多行时，如何按行做日志记录？

 回到顶部
总数 21 上一页 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 4 次数据查询