Qtp-automation-object-model

提供:Dev Guides
移動先:案内検索

QTP-オートメーションオブジェクトモデル

QTP自体は、HP-QTPが提供するCOMインターフェイスを使用して自動化できます。 オートメーションオブジェクトモデルは、テスターが構成設定を制御し、QTPインターフェイスを使用してスクリプトを実行するのに役立つオブジェクト、メソッド、およびプロパティのセットです。 制御できる(ただしこれに限定されない)主要な構成/アクションは以下のとおりです-

  • テストに必要なすべてのアドインをロードします
  • 実行中にQTPを表示します
  • 指定した場所を使用してテストを開きます
  • アソシエイツ関数ライブラリ
  • 共通オブジェクトの同期タイムアウトを指定します
  • 反復の開始と終了
  • スマート識別を有効/無効にする
  • エラー設定時
  • データテーブルパス
  • 回復シナリオの設定
  • ログ追跡設定

QTP 11.5xは、「スタート」>>「すべてのプログラム」>>「HPソフトウェア」>>「HP Unified Functional Testing」>>「ドキュメント」>>「統合」に移動して参照できるオートメーションオブジェクトモデルに関する排他的なドキュメントを提供します機能テスト自動化リファレンス」。

AOMスクリプトを生成

テスターは、「Generate Script」オプションを使用して、QTP自体からAOMスクリプトを生成できます。 以下に示すように、「実行」>>「設定」>>「プロパティ」タブ>>「スクリプトを生成」に移動します-

自動化オブジェクトモデル

' 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