Foxtable(狐表)用户栏目专家坐堂 → [求助]FileManager 问题


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

主题:[求助]FileManager 问题

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/18 9:27:00 [显示全部帖子]

For i As Integer = 1 To 7
    Dim fm As WinForm.FileManager = e.Form.Controls("FileManager" & i)
    If User.Group = "查询" Then
        fm.DeleteCommand.Visible = False
        fm.ClearCommand.Visible = False
        fm.Addcommand.visible = False
        fm.AddFolderCommand.visible = False
        fm.SaveAsCommand.visible = False
       
       
    Else
        If User.Group = "文件管理" Then
            fm.DeleteCommand.Visible = False
        Else
           
            If User.Group = "特定用户" Then
                fm.DeleteCommand.Visible = False
                fm.ClearCommand.Visible = False
                fm.Addcommand.visible = False
                fm.AddFolderCommand.visible = False
            End If
        End If
    End If
next

 回到顶部