设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 4749|回复: 11
打印 上一主题 下一主题

[窗体] 如何设置不同用户登陆后打开不同的窗体

[复制链接]
跳转到指定楼层
1#
发表于 2009-7-14 21:39:47 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
好,我是新手,请教做了登陆窗体后.如何设置不同用户登陆后打开不同的窗体

用户密码表
用户ID用户名密码权限1A1查询窗体8B1在线窗体

Private Sub Cmd确定_Click()
Dim RecCount, RecNo, RecRate
On Error GoTo Err_Cmd确定_Click
If StringEnDeCodecn([Txt密码], 75) = DLookup("[密码]", "用户密码表", "[用户名]=" & "'" & Combo用户名 & "'") _
    And Me.Combo用户名 <> "" Then
   
    Me.Visible = False
        
    Dim stDocName As String
    Dim stLinkCriteria As String
   
    If Forms![用户登陆]![Combo用户名] = DLookup("[用户名]", "用户密码表", "[权限] = '窗体'") Then
        stDocName = "窗体"
    Else
        stDocName = "窗体"
     
         
    End If
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

12#
发表于 2024-1-29 16:54:17 | 只看该作者
学习
回复

使用道具 举报

11#
发表于 2011-10-6 17:20:46 | 只看该作者
学习  非常感谢
10#
发表于 2011-6-15 20:14:41 | 只看该作者
你可以用按钮把要打开的窗体做在不同的窗体中呀!
9#
发表于 2010-5-25 07:11:36 | 只看该作者
顶一下。
8#
发表于 2010-5-24 08:33:16 | 只看该作者
xuexi
7#
发表于 2010-5-14 14:29:23 | 只看该作者
共同学习中
6#
发表于 2010-4-22 07:20:10 | 只看该作者
共同学习中。。。
5#
发表于 2009-8-7 23:41:28 | 只看该作者
新手学习
4#
发表于 2009-7-29 20:28:00 | 只看该作者
有高手说在安全-用户与组权限中设置,可惜我是新新手,只能提供这些
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-16 05:16 , Processed in 0.101254 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表