为什么程序始终走不到else后面的Response.Redirect～～～郁闷

[jerry1st]

If TextBox1.Text = "" Then
Response.Write("<script>alert('用户名不能为空！')</script>")
ElseIf TextBox2.Text = "" Then
Response.Write("<script>alert('密码不能为空！')</script>")
Else



Dim username As String
Dim password As String
username = TextBox1.Text
password = TextBox2.Text

Dim aa As CZYGL.CZY

Dim rs As ADODB.Recordset
rs = Server.CreateObject("ADODB.Recordset")
aa = Server.CreateObject("CZYGL.CZY")

rs = aa.Login(username, password)


If rs Is Nothing Then

Response.Write("<script>alert('帐号或密码错误！！');</script>")

Else
Response.Redirect("index.aspx")

End If
End If

为什么他走不到Response.Redirect("index.aspx")呢？
是不是rs = aa.Login(username, password)

这句有问题啊？？参数类型都是对的。我在rs = aa.Login(username, password)前面加set他不让我加，不知道为什么，哪错了
菜鸟求教

[studydotnet]

rs = aa.Login(username, password)
------------------------------------
调试一下,看看rs的具体值是什么

[Qqwwee_Com]

asp还是asp.net?

#region 广告开始

CSDN小助手 V2.5，更快、更爽、更方便的浏览CSDN论坛！
界面：http://blog.csdn.net/Qqwwee_Com/archive/2005/11/05/523395.aspx
下载：http://szlawbook.com/csdnv2

#endregion

[exboy]

贴 Login 方法的代码

[jimu8130]

你这个是asp的代码？
单步调试