删除记录和查找?头痛 大家帮帮忙吧,该如何解决

删除记录和查找?头痛 大家帮帮忙吧
<%   if   session( "username ") <> " "   then
bh=Request.querystring( "bh ")  
sql= "select   *   from   msg   where   bh= "&bh
set   rs=server.CreateObject( "adodb.recordset ")  
rs.open   sql,conn,1,3
bh=rs.delete
rs.update
end   if   %>      
这是我写的删除语句可以删除但是会报错
错误类型：
ADODB.Field   (0x80020009)
BOF   或   EOF   中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。

if   name <> " "or   bh <> " "then
if   "select   *   from   msg   where   bh= "&bh   or   "select   *   from   msg   where   name= "&name   then
response.Redirect "zhaodao.asp "
else    
response.write( "没有找到要查找的记录 ")
  end   if
  end   if
这是我写的查找语句     可是没有任何反应   这是怎么回事啊

大家帮我看看吧     能不能帮我解决啊       先谢谢了

不好意思我只有这么多分了   没分了     别嫌少啊


------解决方案--------------------
程序已经调试完毕，给你发回去了，你接受一下吧