麻烦哪位大虾帮我看下,这是怎么回事。
这个是系统设置的用户、口令、权限
					
				
			下面是代码,运行后登陆系统总是显示‘输入有误,请重新输入’
//string now_grade
string correct_pswd,sdate
time d_date
d_date=now()
sdate=string(d_date)
if sle_1.text="" or sle_2.text="" then
messagebox("警告!","用户名密码不能为空")
sle_1.setfocus( )
sle_2.setfocus( )
else
    g_input_time=g_input_time+1
    g_user=sle_1.text
    g_pwd=sle_2.text
   g_power=sle_3.text
select user_pwd into :correct_pswd from user_info 
where user_id=:g_user;
    
if trim(g_pwd)=trim(correct_pswd) then
select user_power into :g_power from user_info
where user_id=:g_user;
open(w_main)
//close(w_login)
                
 if trim(g_power) = "管理员" then
  
  w_main.ChangeMenu(m_menu)
  // w_main.ToolbarVisible = true
else
  
  w_main.ChangeMenu(m_menuist)
 //w_main.ToolbarVisible = true
 end if
 close(w_login)
                
else
        
        if g_input_time>2 then
            messagebox("警告","输入用户名口令的次数太多!")
            close(w_login)
        else
            messagebox("警告","输入有误,请重新输入")
        end if
    end if
end if
//end if
麻烦帮我看下,代码是不是有问题,谢谢阿

											
	    
