高手帮忙看看为啥取不出数据啊【菜鸟有关问题】

高手帮忙看看为啥取不出数据啊【初学者问题】
//定义两个变量 
string userpassword,username
// 数据库连接参数
// Profile Homeworkdatabase
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Connectstring='DSN=HomeWorkDataBase'"


//连接数据库
connect;
//检索用户名和密码记录
  SELECT  
  login.username,  
  login.userpasssword  
  INTO
  :username,  
  :userpassword  
  FROM login 
WHERE login.username = :sle_1.text ;



//判断用户输入的用户名是否正确
if sle_1.text="" or sle_2.text="" then
messagebox("错误！","用户名或密码不能为空！",exclamation!,ok!,2)
else
if username=sle_1.text and userpassword=sle_2.text then
open(index)
close(login)
else
messagebox("错误！","用户名或密码错误，请重新输入！",exclamation!,ok!,2)
st_5.text=username
end if
end if

功能是从一个Login表里面取出来用户名和密码 与两个输入框text值进行对比，还设置了一个lable用来显示取出数据后的用户名可是一直为空，有一条警告如下：

Syntax error or violation near 'login' in [login].username,login....

初学实在找不出来错误了

------解决方案--------------------
顶贴！！！！