QTP11 Как использовать сгенерированные настройки VBS скрипта? - PullRequest
Новая
       6

QTP11 Как использовать сгенерированные настройки VBS скрипта?

1 голос
/ 23 января 2012

Я скачал QTP version 11 в первый раз, чтобы увидеть, что такое QTP. Я использую веб-надстройку ActiveX для тестирования веб-приложения.

Я просмотрел справочную документацию и не смог найти ответ.

Файл> Настройки> вкладка Свойства ,

существует "Сгенерированный скрипт" для создания VBS-файла для настройки.

Внутри выглядит так: 

Dim App 'As Application
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.Test.Settings.Launchers("Web").Active = True
App.Test.Settings.Launchers("Web").Browser = "IE"
App.Test.Settings.Launchers("Web").Address = "http://www.w3schools.com/Html/tryit.asp?filename=tryhtml_link_target"
App.Test.Settings.Launchers("Web").CloseOnExit = True

...continue

Так что теперь у меня есть этот файл VBS, который я хочу применить настройки для моего теста. Как я могу это сделать ???

Ответы [ 2 ]

2 голосов
/ 23 января 2012

Вы смотрели документацию для кнопки Создать скрипт ?

Создает скрипт автоматизации QuickTest, содержащий текущие настройки теста.

При нажатии кнопки Generate Script открывается диалоговое окно «Сохранить как», в котором можно указать имя и расположение файловой системы для хранения сгенерированного файла.

Вы можете использовать некоторые или все строки сценария из этого сгенерированного сценария в сценарии автоматизации.Это может быть полезно, например, если вы хотите открыть тест с уже установленными необходимыми настройками теста или задать одинаковые настройки теста для нескольких тестов, просматривая тесты в папке.

Для получения дополнительной информации см. Сценарии автоматизации QuickTest и Справочник по объектной модели QuickTest Professional Automation (Справка > Справка QuickTest Professional> Расширенные ссылки на HP QuickTest Professional> Объектная модель HP QuickTest Professional Automation ).

0 голосов
/ 06 апреля 2018

Файл VBScript, который создает QTP / UFT, не имеет кода для запуска теста. Вы должны добавить следующий код в файл vbscript, чтобы фактически запустить тест при запуске vbscript из командной консоли (код скопирован с http://qtpcode.blogspot.com/2010/06/running-qtp-script-through-vbs-file.html)

Dim qtTest 'As QuickTest.Test ' Declare a Test object variable
Dim qtResultsOpt 'As QuickTest.RunResultsOptions ' Declare a Run Results Options object variable For Viewing Results

Set qtTest = App.Test
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions") ' Create the Run Results Options object
qtResultsOpt.ResultsLocation = "C:\<location>" ' Set the results location
qtTest.Run qtResultsOpt ' Run the test
qtApp.Options.Run.ViewResults = True

'Close QTP
qtTest.Close ' Close the test

'Set the options to nothing
Set qtResultsOpt = Nothing ' Release the Run Results Options object
Set qtTest = Nothing ' Release the Test object
Set qtApp = Nothing ' Release the Application object
...