用户登陆的源码怎么做?
我是新手
我自己编了一个登陆的程序不知道为什么 即使密码本来就是错的也能进入!!
各位前辈能不能给我发个做好的密码登陆的源码啊?
就是从密码表中取用户名和密码 与 表单文本框中的用户名和密码比对
对了就进入
错了重新输入 错误3次锁定的那种!
谢谢啊 急死我了
我是新手
我自己编了一个登陆的程序不知道为什么 即使密码本来就是错的也能进入!!
各位前辈能不能给我发个做好的密码登陆的源码啊?
就是从密码表中取用户名和密码 与 表单文本框中的用户名和密码比对
对了就进入
错了重新输入 错误3次锁定的那种!
谢谢啊 急死我了
[此贴子已经被作者于2006-5-22 10:53:02编辑过]
登陆的确定表单:
我是这样做的,做了一个表,字段包括:用户名、密码,内容你可以随便输入
set exact on
if alltrim(thisform.combo1.value)=""or alltrim(thisform.text1.value)=""
messagebox("用户名或者密码不能为空!",46+2,"验证失败")
ELSE
thisform.n=thisform.n+1
locate for alltrim(用户名)==alltrim(thisform.combo1.value)
if alltrim(密码)==alltrim(thisform.text1.value)
messagebox("登陆成功,欢迎使用!",46+2,"成功登陆")
*可以在调用你的主表单
thisform.release
else
if thisform.n<3
messagebox("密码错误,请重新输入",46+2,"错误")
thisform.text1.value=""
thisform.text1.setfocus()
else
messagebox("密码错误三次,系统无法启动",46+2,"警告")
thisform.release
endif
endif
endif