Foxtable(狐表)用户栏目专家坐堂 → FileManager 调用与功能屏蔽问题


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

主题:FileManager 调用与功能屏蔽问题

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


加好友 发短信
等级:幼狐 帖子:134 积分:1398 威望:0 精华:0 注册:2011/9/14 7:27:00
FileManager 调用与功能屏蔽问题  发帖心情 Post By:2012/3/9 8:37:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:filemanager question.xls

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:filemanager01.foxdb

 

 

"XXX","YYY"打开是出现A、B、C的问题,使用“开发者”、“管理员”问题时不会出现A、B的问题。

 


 


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/3/9 10:25:00 [只看该作者]

你的代码问题,应该是:

 

 

Select Case user.name
    Case "开发者","管理员"
    Case "XXX"
        Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")
        fm.DeleteCommand.Enabled = False
        fm.ClearCommand.Enabled = False
    Case Else
        Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")
        fm.DeleteCommand.Enabled = False
        fm.ClearCommand.Enabled = False
        fm.AddCommand.Enabled = False
End Select


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


加好友 发短信
等级:幼狐 帖子:134 积分:1398 威望:0 精华:0 注册:2011/9/14 7:27:00
  发帖心情 Post By:2012/3/9 11:27:00 [只看该作者]

谢谢!OK了!


 回到顶部