欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

如何通過(guò)計(jì)劃任務(wù)調(diào)用QuickTest測(cè)試腳本

 更新時(shí)間:2007年03月30日 00:00:00   作者:  
我們可以編寫(xiě)一個(gè)Vbs腳本,直接在Windows平臺(tái)下直接運(yùn)行調(diào)用qtp的測(cè)試腳本,也可以將這個(gè)腳本添加到計(jì)劃任務(wù)中,可以定時(shí)執(zhí)行。

腳本如下:
---------------------------------------
復(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)文章

最新評(píng)論