[求助]管理员登录页面的错误！
代码如:
<%admin=Replace(Request.Form("admin"),"'","''")
password=md5(Replace(Request.Form("password"),"'","''"))
sql="select * from admin"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,cn,1,1
do until rs.eof
if admin=rs("admin") and password=rs("password") then
session("admin")=rs("admin")
session("password")=rs("password")
msgbox "欢迎您的光临!"
response.redirect "admin.asp"
%>
<%
else response.Write"<script> alert('用户名或密码错误');history.back(-1);</script>"
end if
rs.movenext
loop
rs.close
set rs=nothing%>
为什么在管理员登录框中无论输入什么，都只出现“用户名或密码错误”呢？ 
大家帮我看下呢
谢谢各位了！
