如何通過計劃任務(wù)調(diào)用QuickTest測試腳本
更新時間:2007年03月30日 00:00:00 作者:
我們可以編寫一個Vbs腳本,直接在Windows平臺下直接運行調(diào)用qtp的測試腳本,也可以將這個腳本添加到計劃任務(wù)中,可以定時執(zhí)行。
腳本如下:
---------------------------------------
Dim qtApp
Dim qtTest
Dim qtResultsOpt
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Open "C:\QuickTest Professional\tests\test1\test1.usr", True
Set qtTest = qtApp.Test
qtTest.Settings.Run.OnError = "NextStep"
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")
qtResultsOpt.ResultsLocation = "C:\QuickTest Professional\tests\test1\"
qtTest.Run
Set qtResultsOpt = Nothing
Set qtTest = Nothing
Set qtApp = Nothing
腳本如下:
---------------------------------------
復(fù)制代碼 代碼如下:
Dim qtApp
Dim qtTest
Dim qtResultsOpt
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Open "C:\QuickTest Professional\tests\test1\test1.usr", True
Set qtTest = qtApp.Test
qtTest.Settings.Run.OnError = "NextStep"
Set qtResultsOpt = CreateObject("QuickTest.RunResultsOptions")
qtResultsOpt.ResultsLocation = "C:\QuickTest Professional\tests\test1\"
qtTest.Run
Set qtResultsOpt = Nothing
Set qtTest = Nothing
Set qtApp = Nothing
相關(guān)文章
vbs中關(guān)于計算機(jī)名的相關(guān)討論
vbs中關(guān)于計算機(jī)名的相關(guān)討論...2007-03-03
VBS教程:正則表達(dá)式簡介 -建立正則表達(dá)式
VBS教程:正則表達(dá)式簡介 -建立正則表達(dá)式...2006-11-11
利用wscript執(zhí)行文件[包括可執(zhí)行exe文件]vbs腳本
利用wscript執(zhí)行文件[包括可執(zhí)行exe文件]vbs腳本...2007-02-02
VBS中獲取系統(tǒng)本次及上次開關(guān)機(jī)時間的代碼(WinXP/win2003/Win7兼容版)
獲取系統(tǒng)本次及上次開關(guān)機(jī)時間的vbs代碼,經(jīng)測試兼容WinXP/win2003/Win7系統(tǒng),喜歡的朋友可以收藏下2013-01-01

