#2
ronyon2017-09-07 14:22
|
//定义局部变量,us开头是用户输入信息,db开头是数据库中读取的数
string us_id,us_name,us_password,db_password
//得到用户输入的登陆信息
us_id=trim(sle_1.text)
us_name=trim(sle_2.text)
us_password=trim(sle_3.text)
//检查用户登陆信息是否输入
if us_id="" then
messagebox("提示","请先输入用户工号!然后再试...")
sle_1.setfocus()
return
end if
if us_name="" then
messagebox("提示","请先输入用户姓名!然后再试...")
sle_2.setfocus()
return
end if
if us_password="" then
messagebox("提示","请先输入密码!然后再试...")
sle_3.setfocus()
return
end if
select password into:db_password from uername
where (uername.id=:sle_1.text) and (uername.name=:sle_2.text);
if us_password=db_password then
open(w_main)
close(w_login)
else
messagebox("提示","输入错误!请重新输入!")
return
end if