what is wrong?

[there_for]

<!--#include file="connection.asp"-->
<!--#include file="chkuser.asp"-->
<%
dim CInfoSQL
CInfoSQL="SELECT * FROM UserInfo WHERE userName = '" & CStr(Session("username")) & " ' "
dim CInfoData
Set CInfoData = Server.CreateObject("ADODB.Recordset")

call CInfoData.Open( CInfoSQL,conn )
On Error Resume Next
IF CInfoData.EOF Then
Session("SysMessage")=":( Sorry, your password is wrong!"
ELSE
If Request("newpass") = "" or Request("repass") = "" then
Session("SysMessage")="输入信息不完整！"
Else
If Request("newpass") = Request("repass") Then
dim Edit
Edit="UPDATE UserInfo SET password='" & CStr(Request("newpass")) & "' WHERE userName='" & CStr(Session("username")) & "'"
Call conn.Execute(Edit)
Session("SysMessage")="Done!"
Else
Session("SysMessage")="密码不一致！"
End if
End if
END IF

Call CInfoData.Close()
Call conn.Close()
Call Response.Redirect("profile.asp")
%>

----End of Code----

为什么密码不能被修改？

[江南昆虫]

兵家大忌！调试阶段不要用“On Error Resume Next”
把这行注释掉，如果有错误，再把错误信息贴出来吧！

[jiangheng]

用On Error Resume Next这个也不是什么大忌，只是在调试阶段用的话，就不能看到错误提示了，调试完毕后可以加上这个，可以使用户的感觉稍好一点的。

[逍遥小贼]

支持楼上！

[there_for]

Ok, 我去掉了 "On..." 但是，还是不行。 没有任何错误提示。
但是，密码就是不能被修改。 为什么呢？