Hvad er der i vejen med denne function?

Jeg har følgende kode.

x = findTopItem("database","searchinCol","identity","identityval")

Private Function findTopItem(dataB,searchInCol,indentityCol,identityVal)


SQlstr = "SELECT * from "& dataB &" where "& indentityCol &"="& identityVal
set objThisItem = my_conn.execute(SQLstr)

    if not objThisItem.EOF then
   
        if objThisItem(searchInCol) <> -1 then
           
            thisValue = objThisItem(searchInCol)
            findTopItem dataB,searchInCol,indentityCol,thisValue
        else
            thisVal = objThisItem(indentityCol)
response.write(thisVal)           
findTopItem = thisVal
            Exit Function
        end if
    else

    findTopItem = identityVal
    Exit Function
    end if

end function

Mit problem er at værdien ikke bliver tilført til variablen x oppe i toppen. I den response.write der er i koden bliver værdien skrevet fint. Mit script skal finde et topitem id fra en træstruktur.