主题:图书馆管理系统,系统管理员无法登录问题求助!
程序发布后输入系统管理员帐号密码却显示帐号不对无法登录。登录的单击事件如下:
if sle_1.text="" then //sle_1为帐号输入区
messagebox("PayAttention!", "The user name cant be null")
sle_1.setfocus()
elseif sle_2.text="" then //sle_2为密码输入区
messagebox("PayAttention!", "The password cant be null")
sle_2.setfocus()
else
G_INPUT_TIME=G_INPUT_TIME+1
G_USER=sle_1.text
G_PWD=sle_2.text
string CORRECT_PSWD
SELECT user_PWD INTO: CORRECT_PSWD FROM user_info1 //user_info1为系统用户信息(帐号密码)
WHERE user_id=:G_USER;
IF G_PWD=CORRECT_PSWD THEN
OPEN(W_MAIN)
CLOSE(W_LOGIN)
ELSE
IF G_INPUT_TIME>3 THEN
MESSAGEBOX("警告", "输入次数过多")
CLOSE(W_LOGIN)
ELSE
MESSAGEBOX("警告", "帐号密码不对")
END IF
END IF
END IF
怎么回事呢?
if sle_1.text="" then //sle_1为帐号输入区
messagebox("PayAttention!", "The user name cant be null")
sle_1.setfocus()
elseif sle_2.text="" then //sle_2为密码输入区
messagebox("PayAttention!", "The password cant be null")
sle_2.setfocus()
else
G_INPUT_TIME=G_INPUT_TIME+1
G_USER=sle_1.text
G_PWD=sle_2.text
string CORRECT_PSWD
SELECT user_PWD INTO: CORRECT_PSWD FROM user_info1 //user_info1为系统用户信息(帐号密码)
WHERE user_id=:G_USER;
IF G_PWD=CORRECT_PSWD THEN
OPEN(W_MAIN)
CLOSE(W_LOGIN)
ELSE
IF G_INPUT_TIME>3 THEN
MESSAGEBOX("警告", "输入次数过多")
CLOSE(W_LOGIN)
ELSE
MESSAGEBOX("警告", "帐号密码不对")
END IF
END IF
END IF
怎么回事呢?