以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 能不能帮忙改下啊,现在报错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=171284) |
-- 作者:ycs5801 -- 发布时间:2021/8/25 11:13:00 -- 能不能帮忙改下啊,现在报错 Dim ctl As WinForm.Control = e.Sender If User.group="业务组" Then If ctl.BindingField <> "主表.是否确认" Or "主表.是否完成" Then ctl.ReadOnly = BooleanEnum.True \'禁止编辑 Else If User.name= Tables("主表").Current("登录人员") Then ctl.ReadOnly = BooleanEnum.False \'允许编辑 End If End If End If |
-- 作者:有点蓝 -- 发布时间:2021/8/25 11:23:00 -- If ctl.BindingField <> "主表.是否确认" Or ctl.BindingField <> "主表.是否完成" Then |
-- 作者:ycs5801 -- 发布时间:2021/8/25 11:30:00 -- Dim ctl As WinForm.Control = e.Sender If User.group="业务组" Then If ctl.BindingField <> "主表.是否确认" Or ctl.BindingField <> "主表.是否完成" Then ctl.ReadOnly = BooleanEnum.True \'禁止编辑 Else If User.name= Tables("主表").Current("发起部门") Then ctl.ReadOnly = BooleanEnum.False \'允许编辑 End If End If End If 老师,按照您的改完。现在是否确认和是否完成还是无法修改。
|
-- 作者:有点蓝 -- 发布时间:2021/8/25 11:31:00 -- 要判断数据什么逻辑,使用文字说明 |
-- 作者:ycs5801 -- 发布时间:2021/8/25 11:55:00 -- 假如当前登录用户是在业务组群组里,假如是处理主表的是否确认和是否完成两个字段以外的字段,就禁止修改,如果是处理这两个字段,则判断是否是登录的用户名和表内的发起部门是否相同,不相同则禁止,相同则允许修改。 |
-- 作者:有点蓝 -- 发布时间:2021/8/25 12:10:00 -- If ctl.BindingField <> "主表.是否确认" andalso ctl.BindingField <> "主表.是否完成" Then |
-- 作者:ycs5801 -- 发布时间:2021/8/25 12:42:00 -- 按照这个改之后,所有的登录用户都可以修改这两个字段。 |
-- 作者:ycs5801 -- 发布时间:2021/8/25 12:53:00 -- 老师,后边我又加个了判断,可以了,你这技术确实高啊 |