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

ppxstar 2006-05-17 03:30:27
下面是全部代码
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语句是自动生成的,就我以前使用经验来看没有什么不对呀!
...全文
353 16 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
16 条回复
切换为时间正序
请发表友善的回复…
发表回复
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呢

1,108

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧