搜索
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 跟大家请教一个设置权限问题
标题:
跟大家请教一个设置权限问题
取消只看楼主
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
结帖率:
66.67%
楼主
已结贴
√
问题点数:20 回复次数:9
跟大家请教一个设置权限问题
跟大家请教一个问题
我做了一个登陆界面,登陆后判断用户权限。现在有一个问题,就是我在module中写了一个查询权限的函数,比如
'添加用户
If Mid(str, 4, 1) = 1 Then
Form_ = True
Else
Form_ = False
End If
我只是需要让这个按键根据权限可用或者不可用,
现在的问题是,每次登陆,这个按键所在的窗体就会弹出来
2015-07-29 14:10
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
2
楼
得分:0
回复 2楼 风吹过b
首先非常感谢版主的耐心解答,这个问题困扰我两天了一直没明白控件所在的窗体为啥会加载。
我想实现的效果是,不同人登陆,进去的是同一个窗体,只是权限不同,相应的控件是灰的不可操作,比如一般用户只能修改密码,不能删除用户
,版主能不能帮我分析下这个思路到底存在什么问题?
万分感谢
2015-07-29 15:14
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
3
楼
得分:0
回复 4楼 wp231957
是放在access用户表里的一串字符
2015-07-29 15:30
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
4
楼
得分:0
回复 6楼 wp231957
对的,就是这样。用户登陆,同时检测权限,然后设置相应的控件属性。你的意思是在设置这些控件属性时,所在的窗体自动被加载了,我需要在主界面卸载该窗体,是吗?
我先去试试
非常感谢
2015-07-29 15:39
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
5
楼
得分:0
回复 6楼 wp231957
我在登陆窗体事件中加了unload,达到了效果,但是发现了一个新问题
登陆
正常进入主界面,放了一个textbox显示当前用户的权限值,正常
进去菜单,正常
这个时候卸载主界面,进入管理界面,增加按键应该是不可控才对,取消,重新加载主界面
发现主界面重新加载后数据丢失了
一开始以为是变量的事,改成全局变量,还是一样
我感觉有点问题,但是又说不清,你能帮我分析一下吗
2015-07-29 17:15
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
6
楼
得分:0
回复 8楼 梦泽雨羲
嗯,就是在模块里定义的全局变量
2015-07-30 12:13
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
7
楼
得分:0
回复 11楼 风吹过b
大神你帮我看看,谢了。
复件 hh.zip
(289.1 KB)
2015-07-30 17:35
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
8
楼
得分:0
回复 14楼 wmf2014
嗯啊,非常感谢,通过调试,发现效果跟我预期要实现的是一样的,同时让我认识到我这种权限设计的思路局限还是挺大,不过暂时满足我目前的需求了。再次感谢
2015-07-31 10:32
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
9
楼
得分:0
回复 16楼 风吹过b
感谢版主帮我理清思路,确实是这样,新手加业余,哈哈。我是自动化搞电子的,之前写代码都是单片机C,面向过程的,想要什么功能写函数就完了,现在做管理 了,发现因为部门工作性质的原因,会产生超级多的记录、报告、证书啥的需要长期保存。闲暇之余就想自己做一个管理系统。一边学、一边锻炼、一边做,确实是想到哪就做到哪。
2015-07-31 10:44
梦泽雨羲
等 级:
论坛游民
帖 子:14
专家分:20
注 册:2015-7-29
第
10
楼
得分:0
回复 19楼 风吹过b
-------------------------------------
关于 mdi 模式窗口程序,提个建议。
菜单,主窗口上是需要的。虽然做到子窗口里,可以做到换窗口,菜单就换了,
但当子窗口都关闭后,那光突突的主窗口怎么办,菜单没有,按钮没有,就有关闭一条路了??
----------------------------------
对的对的,这两天意识到这个问题了,但是最近一直纠结权限这个事,还没有功夫去改它。
受教了
2015-07-31 11:14
10
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-455894-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.144198 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved