Foxtable(狐表)用户栏目专家坐堂 → 请专家帮忙看看PREPAREEDIT中的代码,谢谢


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

主题:请专家帮忙看看PREPAREEDIT中的代码,谢谢

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
请专家帮忙看看PREPAREEDIT中的代码,谢谢  发帖心情 Post By:2019/8/5 19:43:00 [只看该作者]

总是重复提示没有审核权限。

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/5 19:44:00 [只看该作者]

谢谢

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/5 19:49:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:领导审批重复提示没法编辑.rar


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


加好友 发短信
等级:超级版主 帖子:106097 积分:539590 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/5 20:39:00 [只看该作者]

3个问题:
1、不应该在这种表事件里使用current,事件里有e.row或者e.datarow的都不应该使用current
2、不应该在这个事件里使用提示框,原因:http://www.foxtable.com/webhelp/topics/0605.htm
3、不应该在这个事件里进行赋值,赋值应该放到datacolchanged事件

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip



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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/5 20:57:00 [只看该作者]

谢谢老师耐心的指点

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


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2019/8/5 21:39:00 [只看该作者]

老师:你改代码后,没有审核的行就不能录入数据了。请指点。。。。


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


加好友 发短信
等级:超级版主 帖子:106097 积分:539590 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/5 22:07:00 [只看该作者]

StartEdit事件改为

If e.Col.Name = "审核"
    If User.IsRole("主管") = False Then '主管审核
        e.Cancel = True
        MessageBox.show("你无" & IIF(e.Row("审核"),"取消","") & "审核权限!")
    End If
End If



 回到顶部