asp登录问题

Question

if FoundErr<>True then
password=md5(password)
set rs=server.createobject("adodb.recordset")
sql="select * from [Admin] where password='"&password&"' and username='"&username&"'"
rs.open sql,conn,1,3
if rs.bof and rs.eof then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>用户名！！！</li>"
else
if password<>rs("password") then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>密码错误！！！</li>"
else
这段话哪里有问题呀？
sql语句执行没有问题，可是就是没有数据，数据库里也有数据呀？
到底是什么问题？

Answer 1

给你一篇我写得的文章参考一个，原理是一样的http://blog.csdn.net/chinaboyzyq/archive/2009/07/31/4395997.aspx

Answer 2

connstr="provider=microsoft.Jet.oledb.4.0;data source="&server.MapPath("../*.mdb")
set conn=server.CreateObject("adodb.connection")
conn.open connstr
 dim admin_name,admin_pwd
 admin_name=request("admin_name")   
 admin_pwd=request("admin_pwd")   
  set rs=server.CreateObject("adodb.recordset")
sql="select * from admin where admin_name like'"&admin_name&"' and admin_pwd like'"&admin_pwd&"'"
rs.open sql,conn,1,3
  If rs.recordcount   <   1   then  
  response.write   "登陆错误，请返回<a   href=admin.asp>登陆页面再试</a>"   
  else   
        response.redirect   "*.asp"        
  end if 
我也是个菜鸟，跟高手学的，可能有用