QTP - Modèle d'objet d'automatisation

QTP lui-même peut être automatisé à l'aide de l'interface COM fournie par HP-QTP. Le modèle d'objet d'automatisation est un ensemble d'objets, de méthodes et de propriétés qui aident les testeurs à contrôler les paramètres de configuration et à exécuter les scripts à l'aide de l'interface QTP. Les configurations / actions clés qui peuvent être contrôlées (mais sans s'y limiter) sont répertoriées ci-dessous -

Charge tous les compléments requis pour un test
Rend QTP visible pendant l'exécution
Ouvre le test en utilisant l'emplacement spécifié
Bibliothèques de fonctions associées
Spécifie le délai d'expiration de la synchronisation des objets communs
Début et fin de l'itération
Activer / désactiver l'identification intelligente
Sur les paramètres d'erreur
Chemin de la table de données
Paramètres du scénario de récupération
Paramètres de suivi des journaux

QTP 11.5x fournit une documentation exclusive sur le modèle d'objet d'automatisation qui peut être référencée en accédant à "Démarrer" >> "Tous les programmes" >> "HP Software" >> "HP Unified Functional Testing" >> "Documentation" >> "Unified Référence d'automatisation des tests fonctionnels ".

Générer un script AOM

Un testeur peut générer un script AOM à partir de QTP lui-même, en utilisant l'option "Générer un script". Accédez à "Exécuter" >> "Paramètres" >> "Onglet" Propriétés ">>" Générer un script "comme indiqué ci-dessous -

Exemple

' 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