我用vfp做了个用户登陆表单,但什么也不输入也会登陆成功,哪位高人能帮帮我。下面是我编的程序。

来源:百度知道 编辑:UC知道 时间:2024/05/17 02:38:28
nlogtimes=nlogtimes+1
IF nlogtimes>nmaxlogtimes
cstr="你已超过允许得最多登陆次数,登陆对话框将关闭!"
MESSAGEBOX(cstr,16,"用户登陆验证")
thisform.Release
ELSE
cname=ALLTRIM(thisform.text1.value)
cpassword=ALLTRIM(thisform.text2.value)
select 用户资料
LOCATE for ALLTRIM(用户名)=cname
IF NOT FOUND()
MESSAGEBOX("用户名输入错误!",16,"用户登陆验证")

thisform.text1.value=""
thisform.text1.setfocus
RETURN
ENDIF
LOCATE FOR alltrim(密码)=cpassword
IF FOUND()
MESSAGEBOX("登陆成功!",64,"用户登陆验证")
DO FORM 我们的乐园
thisform.Release

ELSE
MESSAGEBOX("密码输入错误!",16,"用户登陆验证")
thisform.text2.value=""
thisform.text2.setfocus

END

建议你加上
if len(allt(thisform.text1.value))=len(allt(用户名)).and.len(allt(thisform.text2.value))=len(allt(密码))
**** (接着判断字符是否相同)
else
**** (提示密码或用户名错误)
endif
判断你输入的字符长度和表中用户、密码字符的长度是不是相等
VFP有时候对空白字符不是很敏感
不过要是加上上面的代码的话
问题就能解决了

很正常,用个函数去掉查找到的密码两边的空白和输入的密码两的空白就行 了
我以前也遇到地那个问题

因为有一个默认的空白值项,字段值全为空,恰好可以对应你什么都不输入,什么都是空白.所以你至少必须判定用户名不能为空.

我用vfp做了个用户登陆表单,但什么也不输入也会登陆成功,哪位高人能帮帮我。下面是我编的程序。 怎么用VFP设计一个用户的登陆窗口? VFP关于做表单的问题 我用vfp设计了一个欢迎使用表单,用时间控制文字动画,怎样能单击表单执行其它程序。 为什么我的vfp不能创建表单 ? 一个用户登陆表单,有两个问题 我要用VB做个学生成绩管理系统,先要做个用户登陆窗体,请问怎么做,程序怎么写 谢谢大家 XP系统中我新建了个用户登陆,然后就找不到超级管理员用户窗口登陆了 一个VFP做的关于登陆数据库的问题,望高手帮我看看那错了 我用VFP编写了一程序,主窗口是_Screen窗口,我只能用表单和菜单按钮进行关闭推出,