can i run my script by command prompt with out intalling qtp at one side?
Printable View
can i run my script by command prompt with out intalling qtp at one side?
hi,
[B]1)create a vbs file[/B]
[B]2)add this code :[/B]
[COLOR=blue]Dim [/COLOR]App
[COLOR=blue]Set [/COLOR]App [COLOR=darkred]=[/COLOR] CreateObject("QuickTest.Application")
App.[COLOR=blue]Launch[/COLOR]
App.[COLOR=blue]Visible [/COLOR][COLOR=darkred]=[/COLOR] [COLOR=blue]True[/COLOR] [COLOR=green]'[I] can be True or false[/I][/COLOR]
[COLOR=green][I]' Load an .ini file with the user-defined parameters.[/I][/COLOR]
App.Test.Environment.LoadFromFile "C:\Test_Params\environment_file1.ini"
[COLOR=green]' Declare an array with the paths and names of the tests.[/COLOR]
[COLOR=blue]dim [/COLOR]testArray([COLOR=red]3[/COLOR])
testArray([COLOR=red]1[/COLOR][COLOR=black])[/COLOR] [COLOR=indigo][COLOR=darkred]=[/COLOR] [/COLOR]"C:\Program Files\Mercury Interactive\QuickTest Professional\Tests\mytest"
testArray([COLOR=red]2[/COLOR]) [COLOR=indigo][COLOR=darkred]=[/COLOR] [/COLOR]"C:\Program Files\Mercury Interactive\QuickTest Professional\Tests\mytest2"
testArray([COLOR=red]3[/COLOR]) [COLOR=indigo][COLOR=darkred]=[/COLOR] [/COLOR]"C:\Program Files\Mercury Interactive\QuickTest Professional\Tests\mytest3"
[COLOR=blue]Set[/COLOR] qtResultsObj [COLOR=indigo][COLOR=darkred]=[/COLOR] [/COLOR]CreateObject("QuickTest.RunResultsOptions")
[COLOR=green][I]' Loop through all the tests in the testArray.[/I][/COLOR]
for i [COLOR=indigo][COLOR=darkred]=[/COLOR] [/COLOR][COLOR=red]1 [/COLOR][COLOR=blue]to [/COLOR][COLOR=blue]UBound [/COLOR](testArray)
[COLOR=green][I]' Open the test in QuickTest Professional.[/I][/COLOR]
App.[COLOR=blue]Open [/COLOR]testArray(i), [COLOR=blue]True [/COLOR]
[COLOR=green][I]' Get the test object.[/I][/COLOR]
[COLOR=blue]Set [/COLOR]qtTest = App.[COLOR=blue]Test [/COLOR]
[COLOR=green][I]' Set the test results options. Here the location for the test results will be set.[/I][/COLOR]
qtResultsObj.ResultsLocation = testArray(i) & "\Res1" ' Set the results location
[I][COLOR=green]'Execute the test. Instruct QuickTest Professional to wait for the test to finish executing.[/COLOR] [COLOR=seagreen]' [COLOR=green]This statement specifies a test results location[/COLOR].[/COLOR][/I]
qtTest.[COLOR=blue]Run [/COLOR]qtResultsObj, [COLOR=blue]True [/COLOR]
[COLOR=green][I]' Run the script using the default test results options.[/I][/COLOR]
qtTest.[COLOR=blue]Run [/COLOR]
[COLOR=green][I]' Close the test.[/I][/COLOR]
qtTest.[COLOR=blue]Close [/COLOR]'Close the test
[COLOR=blue]next [/COLOR]
[COLOR=green][I]' Close QuickTest Professional.[/I][/COLOR]
App.[COLOR=blue]Quit [/COLOR]
[COLOR=green][I]' Release the created objects.[/I][/COLOR]
[COLOR=blue]set [/COLOR]qtResultsObj = [COLOR=blue]nothing[/COLOR]
[COLOR=blue]set [/COLOR]qtTest = [COLOR=blue]nothing[/COLOR]
[COLOR=blue]set [/COLOR]App = [COLOR=blue]nothing [/COLOR]
[B]3[/B])[B]save the vbs file and close it[/B].([COLOR=sienna]c:\work\runQTP.vbs[/COLOR])
[B]4)goes to the remote machine and open the command line.[/B]
[B]5)write the path of the qtp machine and add[/B] ""[COLOR=sienna]c:\work\runQTP.vbs[/COLOR]"
[B]6) this should work[/B]
let me know if it's working for you.
[I]Yan , Tel-Aviv[/I]