可以在导航设置用户权限吗? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 可以在导航设置用户权限吗?

共有16747人关注过本帖树形打印复制链接主题：可以在导航设置用户权限吗?

huaneng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：72 积分：537 威望：0 精华：0 注册：2009/8/15 20:26:00

可以在导航设置用户权限吗? 发帖心情

Post By：2009/12/14 19:35:00 [只看该作者]

Dim Bar As WinForm.NavBar
Bar = e.Form.Controls("NavBar1")
if Bar.SelectedIndex = 0 Then
Tables("导航_Table1").DataSource = DataTables("客户信息")
Tables("导航_Table1").OpenView("a")
Dim Lbl1 As WinForm.Label = Forms("导航").Controls("Label1")
Lbl1.Text = "客户信息"
ElseIf Bar.SelectedIndex = 1 Then
Tables("导航_Table1").DataSource = DataTables("产品目录")
Tables("导航_Table1").OpenView("a")
Dim Lbl1 As WinForm.Label = Forms("导航").Controls("Label1")
Lbl1.Text = "产品目录"

希望用户A只能打开客户信息表,如打开产品目录表会提示没有权限
(在导航窗口中的表都是副本的)