Subversion Repositories DevTools

'-----------------------------------------------------------------------------------------------------------------------------

'   Destroy_All_Objects

'   Should be used by ALL pages and error handling code in order to reduce memory and handle leaks

'   May be used directly or via _footer.asp or globals_destructor.asp

Sub Destroy_All_Objects

    On Error Resume Next

    '   Some global objects

    Set objAccessControl = Nothing

    Set objPMod = Nothing

    Set objEH = Nothing

    Set oEnumStateTypeNames = Nothing

    Set objTabControl = Nothing

    Set objCrumbs = Nothing

    Set objBtnControl = Nothing

    Set objFormCollector = Nothing

    '   Global package info

    Set pkgInfoHash = Nothing

    '   Delete ALL Oracle bound variables

    '   Note: Bound Variables that remain at the end of a Page Process will cause an Oracle Session leak

    If TypeName(OraDatabase) = "IOraDatabase" Then

        While OraDatabase.Parameters.Count > 0

            OraDatabase.Parameters.Remove(0)

        Wend

    End  If

    '   Some commonly used database objects

    rsTemp.Close

    Set rsTemp = Nothing

    rsRep.Close

    Set rsRep = Nothing

    rsQry.Close

    Set rsQry = Nothing

    '   Database objects

    set OraDatabase = Nothing

    set OraSession = Nothing

End Sub

const ORALOB_ONE_PIECE = 0 

const ORALOB_FIRST_PIECE = 1 

const ORALOB_NEXT_PIECE = 2 

const ORALOB_LAST_PIECE = 3

Const ORALOB_SUCCESS = 0

Const ORALOB_NEED_DATA = 99

Const ORALOB_NODATA = 100