更新数据库

<%
set conn=server.CreateObject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.MapPath ("hello.mdb" )
set rs =server.CreateObject("adodb.recordset")
sql="update  htable set hcolumn=hcolumn+0.1"
rs.open  sql, conn,3,3,1
rs.update
错误提示
ADODB.Recordset 错误 '800a0e78'

对象关闭时，不允许操作。

/AD.asp，行 20
可数据库照样更新　这是什么原因？