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