主题：授权的例子请帮忙

我用狐爸做的自定义登录的例子做用户管理,然后用狐爸做的可视化授权做了一个授权,但是因为是自定义用户,那么授权表补齐作用,我的想法是自定义用户管理做的窗口登录进去后,相关的授权表起作用,该不见表的就不见表,该不能编辑的就不能编辑.现在怎么做都不行.

其实刚刚QQ中已经提示你了，你的系统用户是开发者，不是普通用户，所以下面语句的条件成立，直接Return了，授权代码根本就没有执行。

 

If  User.Type <> UserTypeEnum.User Then
    Return
End If

 

 

为什么会这样？ 因为你忘记了自定义用户管理中关键的一部，在系统用户管理中，随便增加一个普通用户，将其设置为默认用户即可正常。

 

或者直接删除这三行代码也行，自定义用户管理的时候，这三行已经没有意义。

自打耳光一个.本来我在想你提示我的是什么意思,本来就没有用到自带登录的的东西,没有想到是默认的问题,那个授权能不能帮我加多一个窗口不可见,谢谢!

你说的窗口不可见是什么意思？

现在根据用户名可以做到表和列不可见或者不可编辑,我想加入一个按窗口名关闭.

没有这种不可见。

设计好的系统，应该都是自定义菜单按钮或者窗口按钮来打开某个窗口，在按钮事件：

 

if 条件成立 then

    forms("窗口名称").Open()

end if

明白