objekter i Session objektet

Det virker ikke når jeg prøver

  set objSearch = new Search
    intSearchcount=1
    blnObjUpdated = false

    for each item in request.form
   
        if left(item,11)="searchfield" THEN
            arrName = split(item,"_")
            strAppend = "_" & arrName(1)
            blnObjUpdated = true
            strSearchfield = request("searchfield" & strAppend)
            strSearchoperator = request("searchoperator" & strAppend)
            strSearchtext = cs(Trim(request("searchtext" & strAppend)))
            strSearchBool = request("booloperator" & strAppend)
            if strSearchBool<>"" THEN intSearchcount=intSearchcount+1
            Call objSearch.addField(strSearchfield, strSearchoperator, strSearchtext, strSearchBool)
        end if

    next
    ' =========================================================================
    objSearch.print()
        set session("objSearchSession") = objSearch


og på næste sider prøver:

    set temp = session("objSearchSession")
    call temp.print()


Så siger den:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'temp.print'

?

Kan man ikke lægge egne defineret objekter i session objektet?