标题:我编了一个登录的程序,可是输正确的用户名和密码进不去,请教!
只看楼主
olivebaby
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-10-5
 问题点数:0 回复次数:5 
我编了一个登录的程序,可是输正确的用户名和密码进不去,请教!

string ls_user,ls_password
ls_user=sle_user.text

if sle_user.text="" or sle_password.text="" then
messagebox("","用户名或口令不能为空!")
return
end if
select yhkl
into:ls_password
from yhkl
where yhmc=:ls_user and yhkl=:ls_password
using sqlca;
if sle_password.text=ls_password then
open(w_main)
close(parent)
else
messagebox("","用户名或口令错误!")
end if

搜索更多相关主题的帖子: 密码 用户名 登录 
2007-10-05 11:36
路過
Rank: 3Rank: 3
等 级:论坛游侠
威 望:7
帖 子:160
专家分:111
注 册:2006-12-15
得分:0 

將and yhkl=:ls_password 去掉,試一下


2007-10-05 12:59
olivebaby
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-10-5
得分:0 

谢谢

2007-10-05 13:00
fyh
Rank: 1
等 级:新手上路
威 望:1
帖 子:52
专家分:0
注 册:2006-4-5
得分:0 

string ls_user,ls_password,ls_passValue
ls_user=Trim(sle_user.text)
ls_password = trim(sle_password.text)

if (ISnull(ls_user) or ls_User = '') OR (ISNULL(ls_password )or ls_password = '') then
messagebox("","用户名或口令不能为空!")
return
end if
select yhkl
into:ls_passValue
from yhkl
where yhmc=:ls_user;
using sqlca;
if ls_PassValue=ls_password then
open(w_main)
close(parent)
else
messagebox("","用户名或口令错误!")
end if


2007-10-05 21:57
targe123
Rank: 1
等 级:新手上路
帖 子:19
专家分:0
注 册:2007-10-24
得分:0 

將and yhkl=:ls_password 去掉,試一下

这个去不去没有关系的,只是他没有在前面为其赋值而已, ls_password=sle_password.text;


代做PB程序设计QQ:252472144
2007-10-29 11:03
freele_china
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:JiNan
等 级:版主
威 望:6
帖 子:352
专家分:0
注 册:2007-4-6
得分:0 
去空格 TRIM()

雁过留声,人过留名
2008-03-15 14:05



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-175179-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 2.074352 second(s), 10 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved