以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  多文件列打开权限控制问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=15771)

--  作者:sanyotaiyo
--  发布时间:2012/1/11 9:04:00
--  多文件列打开权限控制问题

 

 

问题与问题描述见附件!

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多文件列打开权限控制问题.xls

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多文件列打开权限控制问题.foxdb

[此贴子已经被作者于2012-1-11 9:05:20编辑过]

--  作者:sanyotaiyo
--  发布时间:2012/1/11 9:53:00
--  

Select Case user.name
    Case "公共用户"
        e.cancel= True
        Dim fm As WinForm.FileManager = e.Form.Controls("多文件")
        fm.DeleteCommand.Enabled = False
        fm.ClearCommand.Enabled = False
End Select

 

这个代码错误如何处理?



--  作者:sanyotaiyo
--  发布时间:2012/1/11 9:55:00
--  

这个问题可以改成如下问题,如何处理?

 

代开FileManager后限制不同的用户分别具有“打开、插入、删除”等权限


--  作者:狐狸爸爸
--  发布时间:2012/1/11 10:11:00
--  

不用用内置的文件管理器,新建一个窗口,插入文件管理器,绑定到列。

然后就可以在窗口的AfterLoad事件中设置代码:

 

Select Case user.name
    Case "公共用户"
       Dim fm As WinForm.FileManager = e.Form.Controls(“控件名称”)
       fm.DeleteCommand.Enabled = False
       fm.ClearCommand.Enabled = False
End Select


--  作者:quchao
--  发布时间:2013/1/6 23:52:00
--  

刚开始用,这个问题解决了吗?