标题:求助:密码修改,新密码和确认密码不一致,仍然修改密码成功。
只看楼主
zyangxiao
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2019-6-16
结帖率:100%
已结贴  问题点数:10 回复次数:8 
求助:密码修改,新密码和确认密码不一致,仍然修改密码成功。

新手,密码修改,新密码和确认密码不一致,仍然修改密码成功。请各位大神帮忙。
pwd_old=alltrim(thisform.text1.value)
pwd_new1=alltrim(thisform.text2.value)
pwd_new2=alltrim(thisform.text3.value)
if pwd_old==""
   messagebox("请输入原始密码!!",16,"提示")
   thisform.text1.setfocus()
   return
endif
if pwd_new1==""
   messagebox("请输入修改密码!!",16,"提示")
   thisform.text2.setfocus()
   return
endif
if pwd_old<>user_pwd
   messagebox("您输入原始密码不正确!!",16,"提示")
   thisform.text1.setfocus()
   return
endif
if pwd_new2==""
   messagebox("请输入修改确认密码!!",16,"提示")
   thisform.text3.setfocus()
   return
endif
if pwd_new1<>pwd_new2
   messagebox("您输入确认密码不一致!!",16,"提示")
   thisform.text3.setfocus()
   return
endif
open database &lcPath\data\student
update student!user set 密码=pwd_new1 where 账号=user_id
user_pwd=pwd_new1
messagebox("修改密码成功!!",32,"提示")
thisform.release
搜索更多相关主题的帖子: 密码 修改密码 thisform messagebox 提示 
2019-06-18 08:12
xuminxz
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:40
帖 子:749
专家分:2475
注 册:2011-5-8
得分:3 
几处比较都有小问题,用empty()比==""好
if pwd_old==""
   messagebox("请输入原始密码!!",16,"提示")
   thisform.text1.setfocus()
   return
endif
if pwd_new1==""
   messagebox("请输入修改密码!!",16,"提示")
   thisform.text2.setfocus()
   return
endif
if !(pwd_old==user_pwd)
   messagebox("您输入原始密码不正确!!",16,"提示")
   thisform.text1.setfocus()
   return
endif
if pwd_new2==""
   messagebox("请输入修改确认密码!!",16,"提示")
   thisform.text3.setfocus()
   return
endif
if !(pwd_new1==pwd_new2)
   messagebox("您输入确认密码不一致!!",16,"提示")
   thisform.text3.setfocus()
   return
endif
open database &lcPath\data\student
update student!user set 密码=pwd_new1 where 账号=user_id
user_pwd=pwd_new1
messagebox("修改密码成功!!",32,"提示")
thisform.release

[此贴子已经被作者于2019-6-18 08:38编辑过]


dBase有人接盘了。
2019-06-18 08:37
schtg
Rank: 11Rank: 11Rank: 11Rank: 11
来 自:https://t.me/pump_upp
等 级:贵宾
威 望:67
帖 子:1355
专家分:2534
注 册:2012-2-29
得分:0 
可否改为do case?
2019-06-18 14:19
符fp
Rank: 2
等 级:论坛游民
威 望:2
帖 子:24
专家分:32
注 册:2018-12-18
得分:0 
程序为顺序运行,应把最后几句放入条件语句中,条件不满足就跳开不运行了。
2019-06-18 16:06
sxy166
Rank: 3Rank: 3
等 级:论坛游侠
威 望:6
帖 子:68
专家分:127
注 册:2012-3-28
得分:3 
问题出在 <> 上,
new1和2 前面的字符一样 ,
pwd_new1<>pwd_new2 这个表达式的值为 .F.

应该改为 !(pwd_new1==pwd_new2)
2019-06-18 16:13
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:323
帖 子:9621
专家分:26174
注 册:2012-2-5
得分:0 
上传相关文件,才能解决问题

坚守VFP最后的阵地
2019-06-18 18:47
zyangxiao
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2019-6-16
得分:0 
感谢各位大神,特别感谢xuminxz和sxy166,问题解决了,再次感谢!
2019-06-19 10:31
zyangxiao
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2019-6-16
得分:0 
关于<>的用法,pwd_new1<>pwd_new2 和!(pwd_new1==pwd_new2)详细区别,还是不太明白,哪位大神帮忙指点。
2019-06-19 10:35
xuminxz
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:40
帖 子:749
专家分:2475
注 册:2011-5-8
得分:4 
'ABC'='AB'结果为真
'AB'='ABC'结果为假
'ABC'=='AB'、'AB'=='ABC'结果都为假,所以
!('ABC'=='AB')、!('AB'=='ABC')结果都为真。



dBase有人接盘了。
2019-06-19 13:26



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-495328-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.402537 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved