以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求救,用户管理的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=56411)

--  作者:lijin951
--  发布时间:2014/9/4 16:06:00
--  [求助]求救,用户管理的问题
我在用户管理里面新增了一个用户,并设为默认。现在一打开项目就自动登录为默认的那个新增账号了,没办法退回开发界面。就是按ctrl+shift+F12没反应了,我把项目管理里面那个只能由开发者编辑项目的属性也设为了true
还有几个问题,就是新增的用户如何在操作界面增加一点修改密码,注销,锁屏等功能
[此贴子已经被作者于2014-9-4 16:11:00编辑过]

--  作者:有点甜
--  发布时间:2014/9/4 16:11:00
--  

1、http://www.foxtable.com/help/topics/1057.htm

 

2、

Syscmd.Project.Users() 用户管理
Syscmd.Project.SwitchUser() 切换用户

 

3、锁屏参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52203&replyID=343370&skin=1

 


--  作者:lijin951
--  发布时间:2014/9/4 16:34:00
--  
请问,我想实现点击锁屏之后出现一个对话框,然后自己输入密码,之后解锁对话框是用之前输入的密码解锁
--  作者:有点甜
--  发布时间:2014/9/4 16:35:00
--  
 参考2楼
--  作者:Bin
--  发布时间:2014/9/4 16:36:00
--  
利用这个http://www.foxtable.com/help/topics/2435.htm
--  作者:lijin951
--  发布时间:2014/9/4 16:37:00
--  
2楼的方案我仔细研究过了,不能自定义密码,密码是做在锁 窗口的,我这个思路的问题在于要跨窗口,如何来保证之前输入的变量在跨窗口后仍然有用
--  作者:Bin
--  发布时间:2014/9/4 16:39:00
--  
用全局变量保存.看5楼.
--  作者:lijin951
--  发布时间:2014/9/4 16:48:00
--  
这个全局变量如何使用?
有点头晕了,在给InputPassWord函数赋值后,我的锁屏窗口如跟InputPassWord函数进行比对啊?

--  作者:Bin
--  发布时间:2014/9/4 16:50:00
--  
用VAr变量或者 Public变量    赋值之后直接就可以和输入的判断了啊

IF 全局变量=变量 Then

Else

END IF

--  作者:lijin951
--  发布时间:2014/9/4 17:14:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:11111111.jpg
图片点击可在新窗口打开查看
实在是不行呀

Dim pwd As String
If InputPassWord(pwd,"提示","请输入密码:") Then
    Vars("spbh") = pwd
    Return Vars("spbh")
    Messagebox.Show("您输入的密码是:" & pwd)
End If

以上是密码输入时候的代码

Dim pwd As String = e.Form.Controls("TextBox1").Text
If pwd = Vars("spbh") Then
    e.Form.Close
Else
    msgbox("密码不正确,默认密码是123456")
    e.cancel = True
End If

以上是确认窗口的代码

各位大神,我这个办法离真相差多远?
[此贴子已经被作者于2014-9-4 17:14:12编辑过]