以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  组别两种身份  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137407)
--  作者：有点蓝
--  发布时间：2019/7/5 11:13:00
--  
msgbox(_UserGroup)
msgbox(e.form.controls("采购报价明细").Table.Current("部门"))
数据是怎么样的，需要怎样判断？
--  作者：有点蓝
--  发布时间：2019/7/8 13:55:00
--  
case里面是无法使用like的，不要自己编造语法
--  作者：有点蓝
--  发布时间：2019/7/8 15:17:00
--  
if _UserGroup like "*仓库*" then

elseif if _UserGroup like "*计划员*" then
--  作者：有点蓝
--  发布时间：2019/7/9 9:56:00
--  
If _UserGroup <> "管理员"
        If _UserGroup Like "*仓库*" Then
            Select Case e.Col.Name
                Case "备货数量_A类","备货数量_B类"
                Case Else
                    e.cancel = True
            End Select
        ElseIf _UserGroup Like "*计划员*" Then
            Select Case e.Col.Name
                Case "确认数量","备货地址"
                Case Else
                    e.cancel = True
            End Select
        ElseIf _UserGroup Like "*销售内贸*" orelse _UserGroup Like "*销售外贸*"  Then
            Select Case e.Col.Name
                Case "订单要求","备货数量","备注"
                Case Else
                    e.cancel = True
            End Select
    End if
End If