if request("run")="yes" then

id=trim(int(request("id")))
password=request("password")
if password = 123 then
sqlstr = "select * from reply where replyid="&id&""
'response.write sql
'response.end
set rss = Server.CreateObject("adodb.recordset")
rss.open sqlstr,conn,3,3
username=rss("username")
homeurl=rss("homeurl")
xingming=rss("xingming")
body=rss("body")
chexing=rss("chexing")
chepaihao=rss("chepaihao")
dianhua=rss("dianhua")
qita=rss("qita")

sql = "select * from body where id="&id&""
Set Rs = Server.CreateObject("ADODB.Recordset")

Rs.open sql,conn,3,3
Rs.update
Rs("username")=username
Rs("homeurl")=homeurl
Rs("xingming")=xingming
Rs("body")=body
Rs("chexing")=chexing
Rs("chepaihao")=chepaihao
Rs("dianhua")=dianhua
Rs("qita")=qita
Rs.update
Rs.close

set Rs = nothing
rss.close
set Rss = nothing
conn.close
set conn = nothing

response.redirect "index.asp"
response.end
elseif password="" then
response.write "密码不能为空！！！"
response.end
else
response.write "密码错误!!!"
response.end
end if
end if

错误类型：
Microsoft JET Database Engine (0x80040E37)
Microsoft Jet 数据库引擎找不到输入表或查询 'body'。 确定它是否存在，以及它的名称的拼写是否正确。
/test/index/admin/update_user.asp, 第 28 行

我的数据库里面有body表哦，，怎么找不到了？？？？