写了一个密码修改界面，但修改不成功

2006-05-17 03:30:27 476 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【黑马-产品经理入门基础课笔记】01.认识产品经理问题定义 ==> 可行性研究 ==> 需求分析。阅读详情

下面是全部代码
string oldpwd,newpwd,newpwd2
oldpwd=trim(sle_oldpwd.text)
newpwd=trim(sle_newpwd.text)
newpwd2=trim(sle_newpwd2.text)

if oldpwd="" then
messagebox("提示","请输入原始密码！")
sle_oldpwd.setfocus()
return
end if
if oldpwd<>userpwd then
messagebox("提示","原始密码不正确！")
sle_oldpwd.setfocus()
return
end if
if newpwd="" then
messagebox("提示","请输入新密码！")
sle_newpwd.setfocus()
return
end if
if newpwd2="" then
messagebox("提示","请再输入一遍新密码！")
sle_newpwd2.setfocus()
return
end if
if newpwd<>newpwd2 then
messagebox("提示","两次输入密码不一致！")
return
end if

UPDATE tbluser
SET password = :newpwd
WHERE tbluser.id = :userid
;

//判断修改结果
if sqlca.sqlcode=-1 then
messagebox("出错","修改失败，请再试一次，如果多次不成功请与开发商联系！"+sqlca.sqlerrtext)
rollback;
else
userpwd=newpwd
messagebox("提示","修改成功！请牢记您的密码，下次登录使用！")
close(parent)
end if

提示错误码是:SQLSTATE=3000 UPDATE语句语法错误。

但我的UPDATE语句是自动生成的，就我以前使用经验来看没有什么不对呀！

...全文

【R语言-生存分析之观察生存率计算】全人群肿瘤登记资料常用的统计分析指标包括发病率、死亡率、现患率以及生存率等，其中肿瘤生存率是评估肿瘤治疗效果和肿瘤负担的必要指标，其计算涉及肿瘤患者的发病、死亡和随访三个方面的资料，数据整理和计算过程均较为复杂，如何及时、准确地计算肿瘤生存率，并使其可以在不同地区、不同人群、不同时期间被客观公正地比较和评价，仍然是统计学家们一直在研究的主题。阅读详情

ppxstar

PowerBuilder 1,111 成员 66,454 内容

+ 关注 + 加入社区

切换为时间正序

ppxstar 2006-05-23

打赏
举报

找到问题了，但是不明白
为什么要写成tbluser.password 才可以呢？？？

大家说说原因
傍晚结贴

ppxstar 2006-05-23

打赏
举报

好奇怪，我发现用同样的语句更新其它列没有问题，惟独更新password这个字段时出错
查看数据库设置，没有问题，全是一样的。

ikgan 2006-05-23

打赏
举报

你把password改成[password]试试,可能关键字冲突吧...

clank 2006-05-23

打赏
举报

试试把条件里id前面的前缀同时去掉是什么状况,是不是password和id的前缀要一致,呵呵,胡乱猜测一个

ppxstar 2006-05-22

打赏
举报

直接执行没有问题

kitty_961111 2006-05-22

打赏
举报

试试这个：
integer li_row
select count(*)into:li_row from t_employee
where emp_id=:str_sys.userid and emp_password=:sle_old.text;
if li_row=0 or isnull(li_row)then
messagebox("出错提示","输入的旧密码有错,请核对",stopsign!)
return
end if
if sle_new.text<>sle_again.text then
messagebox("出错提示","两次输入的新密码不同,请重新输入",stopsign!)
return
end if
update t_employee
set emp_password=:sle_new.text
where emp_id=:str_sys.userid;
if sqlca.sqlnrows>0 then
commit using sqlca;
messagebox("信息提示","修改密码成功")
close(parent)
else
rollback using sqlca;
messagebox("出错提示","修改密码失败",stopsign!)
return
end if

zjw7789 2006-05-22

打赏
举报

把你的SQL语句直接到数据库上执行一下看看错误在什么地方,这种问题还是要自己多测试!

ppxstar 2006-05-22

打赏
举报

这种问题没有人会吗？？？

ppxstar 2006-05-20

打赏
举报

试过了，不可以
还没有到commit；就出问题了

ppxstar 2006-05-19

打赏
举报

我的连接语句是代码如下

SQLCA.DBMS = "OLE DB"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PROVIDER='Microsoft.Jet.OLEDB.4.0',DATASOURCE='mydb.mdb'"
//SQLCA.LogPass = ""
//SQLCAa.LogId = ""

CONNECT USING SQLCA;

IF SQLCA.sqlcode = -1 THEN
Messagebox('连接错误',SQLCA.sqlerrtext)
halt close
END IF

open(win_loginform)

polestarxu(polestar)
我把你的语句整个拷贝过去都不行
如何判断有没有连接数据库啊?
难道每一次对数据库操作都要重写一段连接数据库的代码？？？

suckerawood 2006-05-19

打赏
举报

加一个commit;应该可以

polestarxu 2006-05-18

打赏
举报

先看看你的autocommit设置为0（手动提交）还是1（自动提交）
如果是0 参照如下
UPDATE tbluser
SET password = :newpwd
WHERE tbluser.id = :userid
;
//判断修改结果
string ls_errtext
if sqlca.sqlcode=-1 then
ls_errtext = sqlca.sqlerrtext
rollback;
messagebox("出错","修改失败，请再试一次，如果多次不成功请与开发商联系！"+ ls_errtext)
else
userpwd=newpwd
commit;//必须提交，而且要写在提示信息前，防止对数据库独占资源，形成死锁
messagebox("提示","修改成功！请牢记您的密码，下次登录使用！")
close(parent)
end if

ppxstar 2006-05-17

打赏
举报

我用的access数据库

nimittz 2006-05-17

打赏
举报

有没有可能是库没连接上呢，或者试试WHERE id = :userid

velen 2006-05-17

打赏
举报

有没有连接数据库啊?

nimittz 2006-05-17

打赏
举报

你直接到库里去跑跑你那句update呢

写了一个密码修改界面，但修改不成功

相关推荐