QTP - Model Objek Otomasi

QTP sendiri dapat diotomatiskan dengan menggunakan antarmuka COM yang disediakan oleh HP-QTP. Model objek otomasi adalah sekumpulan objek, metode, dan properti yang membantu penguji untuk mengontrol pengaturan konfigurasi dan menjalankan skrip menggunakan antarmuka QTP. Konfigurasi / tindakan Utama yang dapat dikontrol (tetapi tidak terbatas pada) tercantum di bawah ini -

Memuat semua add-in yang diperlukan untuk pengujian
Membuat QTP terlihat saat eksekusi
Membuka Tes menggunakan lokasi yang ditentukan
Library Fungsi Associates
Menentukan Waktu Istirahat Sinkronisasi Objek Umum
Mulai dan Akhiri Iterasi
Aktifkan / Nonaktifkan Identifikasi Cerdas
Pada Pengaturan Kesalahan
Jalur Tabel Data
Pengaturan Skenario Pemulihan
Pengaturan Pelacakan Log

QTP 11.5x menyediakan dokumentasi eksklusif tentang model Objek Otomatisasi yang dapat dirujuk dengan menavigasi ke "Start" >> "All Programs" >> "HP Software" >> "HP Unified Functional Testing" >> "Documentation" >> "Unified Referensi Otomasi Pengujian Fungsional ".

Buat AOM Script

Seorang penguji dapat membuat skrip AOM dari QTP itu sendiri, menggunakan opsi "Hasilkan Skrip". Arahkan ke "Run" >> "Settings" >> "Properties" Tab >> "Generate Script" seperti yang ditunjukkan di bawah ini -

Contoh

' 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