Login e senha

Amigos,

estou tentando fazer uma tela de login e senha em delphi asp net, estou usando o seguinte codigo

FbConnection1.open;
try
FbCommand1.Parameters[0].value := login.text.ToUpper;
dr := FbCommand1.executeReader;
if dr.HasRows then

begin
dr.read;
aSenha := senha.text;

if (aSenha = dr[´SENHA´].tostring) then
formsAuthentication.RedirectFromLoginPage(login.text, false)
else
messageBox1.showMessage(´Senha Invalida ´´);

end;
finally
FbConnection1.close;
end;
mas quando digito um usuario que nao tem no banco ele da uma mensagem de erro .... read

o que posso fazer para solicionar?