ActivexTree Control

Hi All,

I'm using ActiveXTreeControl it's giving problem while binding node to tree view,can anybody suggest me some ideas to solve this??

ErrorMsg:The object does not support this method,Or method not implemented yet.

        ' Reference all the Business Partners
        oRecordSet = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset)
        oRecordSet.DoQuery("SELECT * FROM [@ALT_HR_TRAINGRP]")
        'oBPs = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oUserTables)
        'oBPs.Browser.Recordset = oRecordSet


        ' Iterate all the BPs
        oRecordSet.MoveFirst()
        'oBPs.Browser.MoveFirst()
        Dim j As Integer
        For j = 1 To oRecordSet.RecordCount - 1
            BPNode = oTreeView.Nodes.Add(, , "B" & oRecordSet.Fields.Item(0).Value, oRecordSet.Fields.Item(2).Value) <<---Error
       next

shangai.