Mais de um objeto sem propriedades exclusivas na mesma tela: Como lidar com eles usando programação descritiva no QTP?
Suponha que você encontre a seguinte tela na aplicação que está testando:
Quando você inspeciona esses objetos, você percebe que eles não têm propriedades únicas (exclusivas), e você não consegue diferenciá-los utilizando a programação descritiva. O que fazer então?
Você pode usar o seguinte trecho de código para clicar no primeiro botão Add, por exemplo. (veja os comentários para obter detalhes sobre o código abaixo):
_______________________________________________________
'Define as características gerais dos objetos
Set objectDescription = Description.Create()
objectDescription("html tag").Value = "INPUT"
objectDescription("type"). Value = "button"
objectDescription("value"). Value = "Add"
'Define a página onde estão localizados os filhos (objetos propriamente ditos)
Set objectChild = Browser("Claris Browser").Page("index:=0").ChildObjects(ojectDescription)
'Se necessário, conte quantos objetos existem na página
'counter = objectChild.Count()
'Clica no primeiro objeto encontrado (índices variam de 0 até counter-1)
objectChild(0).Click()
'Aqui as variáveis vão ser desalocadas
Set objectChild = Nothing
Set objectDescription = Nothing
_______________________________________________________
Sinta-se à vontade para enviar perguntas ou sugestões.
Até breve!
Comentários
Postar um comentário