QTP - Object не поддерживает это свойство или метод error

Question

Я не уверен, что не так с приведенным ниже кодом.

Set obj=description.Create() 

    obj("micClass").Value="Link" 
    obj("name").Value="Advertising Programs" 

    Set totalnobuttons=Browser("title:=.*").Page("title:=.*").ChildObjects(obj) 
    totalnobuttons.highlight 
    print totalnobuttons.count 

    For i=0 to totalnobuttons.count-1 
     print totalnobuttons(i).GetRoProperty("name") 
    Next 

Это сообщение об ошибке «Объект не поддерживает это свойство или ошибку метода» во время выполнения. Мне нужно выделить ссылку программы «Рекламные программы», используя приведенный выше код.

Answer 1

Ваша линия:

totalnobuttons.highlight 

является виновником. Вы пытаетесь выделить всю коллекцию Link объектов. Вы не можете сделать это. Вместо этого удалите эту строку и положить, что в вашем For...Loop как это:

For i = 0 to totalnobuttons.count-1 
    totalnobuttons(i).HighLight 
    print totalnobuttons(i).GetRoProperty("name") 
Next 

Answer 2

Вы пытаетесь найти объект коллекции. Тип возврата должен быть всегда массивом объектов. Попробуйте использовать продвинутый для цикла для продолжения. Найти код:

For each button in totalnobuttons 
    button.HighLight 
    print button.GetRoProperty("name") 
Next