发一个ASP的ADODB类代码(10)

                                closed()
                        else
                                Insert_Table = false
                        end if
        End Function
        '关闭数据库链接
        Public Function closed()
                        if not isempty(rs) and not isnull(rs) then
                                if rs.state = 1 then
                                        rs.close
                                end if
                        end if
                        rsCounts = 0:rsPage = 1:nowPage = 1
        end function
        '**********释放类************
        Private Sub Class_Terminate() 
                        readCounts = 0:rsCounts = 0:rsPage = 0
                        if not isempty(conn) and not isnull(conn) then
                                if conn.state = 1 then