新浪博客

力控密码控制的三种方式

2009-07-22 13:47阅读:
  在使用力控做工程时,经常会遇到这样的情况。需要对一些操作进行密码控制,需要密码登陆才能进行操作,例如按钮,例如数值输入,例如画面的切换等等。
  当然,使用力控自带的用户登陆,或者安全区可以实现这功能。
  操作如下:
  1、使用控件的禁止属性和用户登陆功能。
  具体步骤如下:
  1在按钮ButtonEx的禁止属性上设置$UserLevel<0($UserLevel为当前的用户级别,在数据库的中间变量里找)。何时禁止使用表达式为真。或者设置$UserLevel>0,何时禁止使用表达式为假。这两个是一样的意思。这样,运行一下会发现这个按钮在不登陆的时候是无法操作的。增加一文本Text1在按钮的左键动作里增加一个动作,例如说在文本里输入字符
  #Text1.Text='欢迎光临工程服务网站-www.bjrkhc.com!'
  2增加一按钮ButtonEx1,增加左键动作,Login()。
  3在系统配置的用户管理里增加用户。例如用户名admin,密码123456。
  这样就实现了对按钮的密码控制,当你需要对按钮ButtonEx进行操作,在文本里显示内容时,就需要先操作ButtonEx1,对弹出的登陆框进行用户名和密码登陆,然后就可以实现在文本里显示内容了。
  2、使用安全区属性和用户登陆功能。
  1在按钮ButtonEx的安全区属性上选择某一个安全区,例如A区。增加一文本Text1在按钮的左键动作里增加一个动作,例如说在文本里输入字符
  #Text1.Text='欢迎光临工程服务网站-www.bjrkhc.com!'
  2在系统配置的用户管理里增加用户。例如用户名admin,密码123456。而且要设置用户的安全区,在这里要在用户的安全区里把A区选择上。
  这样,在对按钮进行操作的时候,就需要你对拥有对改按钮的安全区功能的用户名登陆。就可以进行操作了。
  3、自定义登陆画面
  1新建立一个登陆窗口。例如命名为KEY。在画面里增加2个文本输入框。再
增加一个确定按钮。
  2新建一个中间变量。命名为pass。
  3在key画面的确定按钮里输入如下代码
  if#TextControl.Text=='admin'
then
if#TextControl15.Text=='123'
then
Display('hello');
pass=1;
else
MsgBox('用户名和密码错误!')
endif
endif

  4在按钮ButtonEx里输入代码
  if pass
then
#Text.Text='hello,welcometochina';
else
#Text.Text='first time,please inseat password';
Display('key');
endif

  这样就实现了对按钮ButtonEx的操作密码控制。当然也可以对密码控制的效果进行各种调整。
原创文章,转载请注明出处www.bjrkhc.com-工程服务

我的更多文章

下载客户端阅读体验更佳

APP专享