主题:一个关于登陆的问题
小忆执笔
[专家分:20] 发布于 2006-10-17 18:21:00
各位好
我是一个PB新手
我写了一个登陆的程序为什么老是报错啊
各位能不能帮我写一个然后我看看是哪里的错啊
我在网吧所以不能把源程序写在这里
请各位帮帮偶
回复列表 (共8个回复)
沙发
bfdn [专家分:10] 发布于 2006-10-18 08:17:00
先建一个数据表,其中要包括两个字段,user_id和user_pwd
下面是连接的代码,你看一看吧
IF sle_1.text='' then //如果用户名为空
messagebox('注意','用户名不能为空')//弹出注意消息框
sle_1.setfocus()//单行编辑框1获焦点
elseif sle_2.text='' then//否则如果密码框为空
messagebox('注意','密码不能为空')
sle_2.setfocus()//密码框获得焦点
else
g_input_time=g_input_time+1//每输入错一次用户或密码,计数加1
g_user=sle_1.text
g_pwd=sle_2.text
//取出表user_info中用户为g_user的密码放到correct_pswd中
select user_pwd into:correct_pswd from user_info where user_id=:g_user;
//用数据库中的密码和用户输入的密码比较
if g_pwd=correct_pswd then
open(w_main)
close(w_login)
else
//可重输入3次
if g_input_time>3 then
messagebox('警告','输入用户口令次数太多,非法用户')
close(w_login)
else
messagebox('警告','输入用户口令错误,请重新输入')
end if
end if
end if
板凳
sei兔 [专家分:190] 发布于 2006-10-18 16:32:00
你在网吧,也可以玩数据库吗?
3 楼
毛毛她爹 [专家分:0] 发布于 2006-10-20 15:25:00
借楼主的帖子,想请教一下,是不是在这个窗口设计中还要有一个隐含的数据窗口dw_1,连接到一个datawindow,该datawindow中要有userid和pass两个字段。
这样才能在程序主窗口中的select语句中得到正确的运行。
4 楼
小忆执笔 [专家分:20] 发布于 2006-10-20 21:38:00
非常感谢大家的帮助
呵呵,有机会请大家吃饭哦!!
好的,我会努力的!
对了我还有一个问题就是select insert 语句在pb9.0中的具体用法
我们讲的不多,所以有许多不明白之处,希望大家给予帮助!!
小忆将感激不尽!!!
也是QQ说啊418512894
5 楼
blackcao [专家分:200] 发布于 2006-10-31 12:58:00
to 3楼,不用,一般用户名,权限等在登陆后就付给全局变量,以后的直接调用就行
6 楼
小忆执笔 [专家分:20] 发布于 2006-11-16 13:57:00
呵呵,谢谢了各位
我的问题以经解决了,
THANK YOU
7 楼
dtx01 [专家分:0] 发布于 2006-12-04 09:59:00
如果还需要其它帮助,请联系我,我的QQ727665520
8 楼
小忆执笔 [专家分:20] 发布于 2006-12-04 17:22:00
好的谢谢你了!
我来回复