JavaTree

[perplexed]

Thanks a lot Lotos. It helped.
I have also written my own script that goes like this :


Public Function findItemCount(ByRef levelID ) // levelID will be the level in the javatree. viz #0;#4;#4 or #i;#j etc.

Code:

Dim itemID
   Dim itemCount
   itemCount = 0
   On Error Resume Next
   Do While true
        itemID = levelID + ";#" + CStr(itemCount)  
        JavaWindow("XXX").JavaTree("JavaTree_obj").Select CStr(itemID)
        If Err.Number <> 0 then
            Exit do
        end if
        itemCount = itemCount + 1

    Loop
    On Error GoTo 0
    
    findItemCount = itemCount
    
End Function

ps. I have tested it and it works fine