
求登陆界面的代码PB+SQL
http://lh4.google.com/link20042004/R0pvlIGR70I/AAAAAAAAACk/zK7JYf2nsMo/QQ%E6%88%AA%E5...
http://lh4.google.com/link20042004/R0pvlIGR70I/AAAAAAAAACk/zK7JYf2nsMo/QQ%E6%88%AA%E5%9B%BE%E6%9C%AA%E5%91%BD%E5%90%8D.jpg
展开
展开全部
代码如下,
说明:其中sle_uname是指输入用户名的单行编辑框,下同。sno指表中的用户名,password为表中用来登录的密码。t_student为登陆表!
string ls_uname,ls_pwd1,ls_pwd2,ls_sno,ls_s1
ls_uname=sle_uname.text
ls_pwd1=sle_pwd.text
select sno
into :ls_sno
from t_student
where t_student.sno=:ls_uname;
if sle_uname.text="" or sle_pwd.text="" then
messagebox("提示","用户名或密码不能为空,请输入用户名或密码!")
sle_uname.text=""
sle_pwd.text=""
return
end if
select password
into :ls_pwd2
from t_student
where t_student.sno = :ls_uname ;
if ls_pwd1 = ls_pwd2 then
open(w_main)
close(w_login)
else
messagebox("错误","用户名或密码错误,请重新输入!")
sle_pwd.text=""
return
end if
有不懂的再联系哈!
说明:其中sle_uname是指输入用户名的单行编辑框,下同。sno指表中的用户名,password为表中用来登录的密码。t_student为登陆表!
string ls_uname,ls_pwd1,ls_pwd2,ls_sno,ls_s1
ls_uname=sle_uname.text
ls_pwd1=sle_pwd.text
select sno
into :ls_sno
from t_student
where t_student.sno=:ls_uname;
if sle_uname.text="" or sle_pwd.text="" then
messagebox("提示","用户名或密码不能为空,请输入用户名或密码!")
sle_uname.text=""
sle_pwd.text=""
return
end if
select password
into :ls_pwd2
from t_student
where t_student.sno = :ls_uname ;
if ls_pwd1 = ls_pwd2 then
open(w_main)
close(w_login)
else
messagebox("错误","用户名或密码错误,请重新输入!")
sle_pwd.text=""
return
end if
有不懂的再联系哈!

2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询