asp SQL 对象关闭时，不允许操作 错误

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

原来，
RecordSet在执行不返回记录集的命令时（DELETE UPDATE 等）不改变其打开状态
也就是说
'Recordset状态为关闭状态
rs.Open "delete from tableName where condition"
'执行以后Recordset状态还是关闭状态
'rs.close 就会出错
-----------------
但是：
'Recordset状态为关闭状态
rs.Open "select * from tableName where condition"
'执行以后Recordset状态就变成打开状态了
rs.close '没问题，可以关闭 


---------------------------------------
修改dbclose，改成
public function dbclose(rs)
if rs.state=AdStateClosed then
else
rs.close
set rs=nothing
end if
end function