char mima,username
SELECT yonghu.yonghuming,
yonghu.yonghumima
INTO :username,
:mima
FROM yonghu
WHERE yonghu.yonghuming = :sle_1.text;
ifsle_1.text="" or sle_2.text="" or sle_3.text=""then
messagebox("错误!","用户名或密码不能为空!",exclamation!,ok!,2)
else
if sle_1.text=username and sle_2.text=mima then
UPDATE "yonghu"
SET yonghu.yonghumima =:sle_3.text;
messagebox("密码修改成功!","请记住新密码,下次登录时请使用新密码!",exclamation!,ok!,2)
else
messagebox("错误!","用户名或密码错误,请重新输入!",exclamation!,ok!,2)
end if
end if
运行之后修改不了,每次都说用户名或密码错误,请重新输入,请问到底哪里错了?帮忙修改一下!谢谢啦!!!
|