24小时热门版块排行榜    

查看: 497  |  回复: 1
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

瓦牛跑

铁虫 (初入文坛)

[求助] pb 登录脚本

string ls_uname,ls_pwd1,ls_pwd2,ls_sno
ls_uname=sle_1.text
ls_pwd1=sle_2.text
select username
into :ls_sno
from baohai
where baohai.username=:ls_uname;
if sle_1.text="" or sle_2.text="" then
messagebox("提示","用户名或密码不能为空,请输入用户名或密码!"
sle_1.text=""
sle_2.text=""
return
end if
select password
into :ls_pwd2
from baohai
where baohai.username = :ls_uname ;
if ls_pwd1 = ls_pwd2 then
open(w_main)
close(w_login)
else
messagebox("错误","用户名或密码错误,请重新输入!"
sle_2.text=""
return
end if

运行报错“用户名或密码错误,请重新输入!”
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 瓦牛跑 的主题更新
信息提示
请填处理意见