SQL语句求助!红色标出的语句提示语法错误!这段代码的目的是“实现创建用户名,密码和权限,要求用户名不能重复”

hunaijiao 2012-06-23 06:44:55
string ls_yonghu,ls_mima,ls_queren,ls_quanxian
ls_yonghu=trim(sle_1.text)
ls_mima=trim(sle_2.text)
ls_queren=trim(sle_3.text)
ls_quanxian=trim(ddlb_1.text)

if ls_yonghu="" or ls_mima="" or ls_queren="" or ls_quanxian="" then
messagebox("提示!","各项信息不能为空!")
else
if ls_mima=ls_queren then
if not exists(select yonghu from zhanghao where yonghu=:ls_yonghu) then
insert into zhanghao(yonghu,mima,quanxian)values(:ls_yonghu,:ls_mima,:ls_quanxian);
if sqlca.sqlcode=0 then
commit using SQLCA;
messagebox("成功!","用户创建成功!")
ddlb_1.SelectItem(0)
sle_2.text=""
sle_3.text=""
sle_1.text=""
else
messagebox("失败!","用户创建失败!")
rollback;
ddlb_1.SelectItem(0)
sle_2.text=""
sle_3.text=""
sle_1.text=""
end if
else
messagebox("提示!","该用户名已存在!")
end if
else
messagebox("提示!","密码确认错误!")
sle_2.text=""
sle_3.text=""
end if
end if
...全文
625 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhy686 2012-11-01
  • 打赏
  • 举报
回复
楼主估计之前接触的数据是SQLserver.
网络橘子 2012-08-31
  • 打赏
  • 举报
回复
1楼正解
a954105626 2012-08-29
  • 打赏
  • 举报
回复
楼上整洁
wag_enu 2012-06-23
  • 打赏
  • 举报
回复
嵌入式SQL 没有 exists 方法。因而提示错误。
可以改成:
int li_count
select count(1) into :li_count from zhanghao where yonghu=:ls_yonghu

if li_count > 0 then
insert .....

740

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 脚本语言
社区管理员
  • 脚本语言社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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