首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

PB登录难点 求解

2012-12-15 
PB登录难题 求解string name,psd, tx1,tx2tx1trim(sle_1.text)tx2trim(sle_2.text)if tx1 thenmessag

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’}

热点排行