03-08-2010, 09:55 AM
Following is my .vbs file from where i m initiating the test:
Thanks,
Ajit
Code:
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
'qtApp.Open "D:\Program Files\Mercury Interactive\QuickTest Professional\Tests\Creating a Gmail ID" 'this is the location of test scripts
Set qtTest = qtApp.Test
'Set QuickTest run options
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = False
qtApp.Open "\\Ausyddata02\testing\QTP Common\Lab Tests\Automated Tests\Installing SiPass 2.50", True ' Open the test in read-only mode
' set run settings for the test
Set qtTest = qtApp.Test
qtTest.Run ' Run the test
'qtTest.Close ' Close the test
'qtApp.quit
Set qtTest = Nothing ' Release the Test object
Set qtApp = Nothing ' Release the Application object
'qtTest.Close
'qtApp.Quit
Thanks,
Ajit