关于登录对话框的问题
我是初学VF的,在建立好一个存储密码的数据库文件password.dbf分别有用户名和密码;用控件创建好对象后[三个方字控件(l1、l2、l3);三个文本框(T1、T2、T3),两个按钮控件(修改和取消)],学识浅不知道怎么编写代码?要求是在T1中输入已有的用户名,在T2中输入旧密码,在T3中输入新密码,然后传入数据库文件password.dbf。请问这段密码如何写啊!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
if thisform.text1.value=kouling
thisform.release
do form pfcstart
else
i=i+1
if i=3
messagebox("你无权使用本系统!",16,"输入口令")
thisform.release
close tables all
close database
clear events
quit
else
messagebox("口令错误,请重新输入!",48,"输入口令")
thisform.text1.value=" "
thisform.text1.setfocus
endif
endif
return
以上是确定按钮的click
kouling是内存变量。存到表中的密码经加密已变为乱码,用时经转换存入'kouling'中,在与输入的作比较。我的仅有密码,没有用户名,你看着加吧!
2楼的存入.mem中,仍能通过一定的方法看到,并不起保密作用。