QTP - Modelo de Objeto de Automação
O próprio QTP pode ser automatizado usando a interface COM fornecida pelo HP-QTP. O modelo de objeto de automação é um conjunto de objetos, métodos e propriedades que ajudam os testadores a controlar as definições de configuração e executar os scripts usando a interface QTP. As configurações / ações principais que podem ser controladas (mas não limitadas a) estão listadas abaixo -
- Carrega todos os add-ins necessários para um teste
- Torna QTP visível durante a execução
- Abre o teste usando o local especificado
- Bibliotecas de funções de associados
- Especifica o tempo limite de sincronização do objeto comum
- Iniciar e terminar a iteração
- Ativar / desativar identificação inteligente
- Nas configurações de erro
- Caminho da tabela de dados
- Configurações do cenário de recuperação
- Configurações de rastreamento de log
O QTP 11.5x fornece uma documentação exclusiva sobre o modelo de objeto de automação que pode ser consultado navegando até "Iniciar" >> "Todos os programas" >> "HP Software" >> "HP Unified Functional Testing" >> "Documentação" >> "Unificado Referência de automação de teste funcional ".
Gerar script AOM
Um testador pode gerar um script AOM a partir do próprio QTP, usando a opção "Gerar Script". Navegue até "Executar" >> "Configurações" >> guia "Propriedades" >> "Gerar Script" conforme mostrado abaixo -
Exemplo
' A Sample Script to Demostrate AOM
Dim App 'As Application
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.Test.Settings.Launchers("Web").Active = False
App.Test.Settings.Launchers("Web").Browser = "IE"
App.Test.Settings.Launchers("Web").Address = "http://easycalculation.com/"
App.Test.Settings.Launchers("Web").CloseOnExit = True
App.Test.Settings.Launchers("Windows Applications").Active = False
App.Test.Settings.Launchers("Windows Applications").Applications.RemoveAll
App.Test.Settings.Launchers("Windows Applications").RecordOnQTDescendants = True
App.Test.Settings.Launchers("Windows Applications").RecordOnExplorerDescendants = False
App.Test.Settings.Launchers("Windows Applications").RecordOnSpecifiedApplications = True
App.Test.Settings.Run.IterationMode = "rngAll"
App.Test.Settings.Run.StartIteration = 1
App.Test.Settings.Run.EndIteration = 1
App.Test.Settings.Run.ObjectSyncTimeOut = 20000
App.Test.Settings.Run.DisableSmartIdentification = False
App.Test.Settings.Run.OnError = "Dialog"
App.Test.Settings.Resources.DataTablePath = "<Default>"
App.Test.Settings.Resources.Libraries.RemoveAll
App.Test.Settings.Web.BrowserNavigationTimeout = 60000
App.Test.Settings.Web.ActiveScreenAccess.UserName = ""
App.Test.Settings.Web.ActiveScreenAccess.Password = ""
App.Test.Settings.Recovery.Enabled = True
App.Test.Settings.Recovery.SetActivationMode "OnError"
App.Test.Settings.Recovery.Add "D:\GUITest2\recover_app_crash.qrs",
"Recover_Application_Crash", 1
App.Test.Settings.Recovery.Item(1).Enabled = True
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' System Local Monitoring settings
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
App.Test.Settings.LocalSystemMonitor.Enable = false
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Log Tracking settings
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
With App.Test.Settings.LogTracking
.IncludeInResults = False
.Port = 18081
.IP = "127.0.0.1"
.MinTriggerLevel = "ERROR"
.EnableAutoConfig = False
.RecoverConfigAfterRun = False
.ConfigFile = ""
.MinConfigLevel = "WARN"
End With