pb 中代码的错误请指正

来源:百度知道 编辑:UC知道 时间:2024/05/29 18:38:20
string ls_name,ls_pwd
ls_name=sle_1.text
ls_pwd=sle_2.text
select userlist.username,uesrlist.pwd
into :ls_name, :ls_pwd
from userlist
where (userlist.username=:ls_name) and (uesrlist.pwd=:ls_pwd)
if (sqlca.sqlcode<>0) then
messagebox("提示","error");
else
open(w_1)
end if

string ls_name,ls_pwd
ls_name=sle_1.text
ls_pwd=sle_2.text
select userlist.username,uesrlist.pwd
from userlist
where (userlist.username=:ls_name) and (uesrlist.pwd=:ls_pwd);
if (sqlca.sqlcode<>0) then
messagebox("提示","error");
else
open(w_1)
end if

楼上正解,把into :ls_name, :ls_pwd这一行去掉就行了,因为这一行是赋你userlist表中select出来的值的