读书人

PB登录难点 求解

发布时间: 2012-12-15 15:16:03 作者: rapoo

PB登录难题 求解
string name,psd, tx1,tx2
tx1=trim(sle_1.text)
tx2=trim(sle_2.text)
if tx1='' then
messagebox('警告','请输入用户!',stopsign!)
return;
end if
if tx2='' then
messagebox('警告','请输入密码!',stopsign!)
return;
end if
SELECT yonghu,
mima,
into :name,:psd from " baohai"
where baohai.yonghu=:tx1 and baohai.mima=:tx2;
if trim(name)<>trim(tx1) and trim(psd)<>trim(tx2) then
messagebox('警告','请输入正确的用户或密码!',stopsign!)
else
open(w_main)
close(w_login)


运行警告database:c0038:sqlstate=37000[sybase][odbc drive]]{sql anywhere。。1.。‘from’}

读书人网 >PB

热点推荐