Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]LoadUserSetting增加开发者


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

主题：[求助]LoadUserSetting增加开发者
帅哥哟，离线，有人找我吗？
易服
 小大  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：787 积分：6349 威望：0 精华：0 注册：2008/9/1 8:26:00 		[求助]LoadUserSetting增加开发者  发帖心情 Post By：2009/11/13 16:51:00 [只看该作者]

If User.Type = UserTypeEnum.Administrator AndAlso User.Type = UserTypeEnum.开发者 Then
    Tables("人员").Visible = True
    Tables("单位").Visible = True
    Tables("林种").Visible = True
    Tables("树种").Visible = True
Else
    Tables("人员").Visible = False
    Tables("单位").Visible = False
    Tables("林种").Visible = False
    Tables("树种").Visible = False
End If

黑体部分是正确的想加入彩色部分不知怎么加？

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


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2009/11/13 16:54:00 [只看该作者]

If User.Type = UserTypeEnum.Administrator OElse User.Type = UserTypeEnum.开发者 Then

AndAlso 是与的意思，一个用户怎么可能同时是开发者和管理员？

 回到顶部
帅哥哟，离线，有人找我吗？
易服
 小大  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：787 积分：6349 威望：0 精华：0 注册：2008/9/1 8:26:00 		  发帖心情 Post By：2009/11/13 17:06:00 [只看该作者]

"开发者"不能直接用要换成英文

 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2009/11/13 17:10:00 [只看该作者]

我复制你的，正确的：

If User.Type = UserTypeEnum.Administrator OElse User.Type = UserTypeEnum.Developer Then

其实帮助可以查的。

User

UserInfo类型表示用户，它包括三个属性，用于返回用户信息：

  • Name
    返回用户名
     
  • Group
    返回用户分组
     
  • Default
    逻辑型，如果是默认用户，则返回True，否则返回False
     
  • Type
    返回用户级别(类型)，UserTypeEnum型枚举，包括以下可选值:

    Developer: 开发者
    Administrator：管理员
    User：普通用户。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 4 次数据查询