mohan babu.k

• Nov 10th, 2006

 

Hi,

    Yes, this is Possible to use Start-up Scripts in QTP

Shrikanth Bhosale

• Nov 10th, 2006

 

Pls explain in detail regarding creating start-up scripts

subhash

• Nov 10th, 2006

 

ViewNow X Server and InterDrive Client are recognized for outstanding reliability and performance in providing users with fast, easy, and secure network access to resources on either NFS or UNIX servers. ViewNow X Server software makes it easy and affordable for Windows PC users to run memory-intensive, graphics-rich X applications such as CAD/CAM, finite element modeling, financial analysis, database administration, production planning, inventory control, and more. Also, ViewNow? InterDrive? Client provides Microsoft Windows users with fast, easy, and secure network access to resources on NFS servers. What a combination!

Kumar L S

• Dec 13th, 2006

 

Hi,

We dont have any Startup Script in QTP like we have it in WinRunner.

Instead we have Initialization Script where you have to write your own VB Script to make QTP to run this script before executing each test.

Thanks,

Kumar L S

RAJAGOPAL REDDY

• Dec 14th, 2006

 

Yes,

We can put start applications URL/Address/Exe file path in the default record or run settings for Windows/WEB. Once opens QTP immediately that particular application or URL will open.

Thanks-RAJAGOPAL REDY Email: Reddy_rajagopal@yahoo.co.in

atdhdrolla

 Profile Answers by atdhdrolla Questions by atdhdrolla

• Mar 7th, 2007

 

A Startup script to launch QTP, Open the test , Create a result folder and run the test may look like this:

Dim App
Set App = CreateObject("QuickTest.Application")        'Create an object of Quick Test

App.Launch        'Launch QTP

App.Visible = True

App.Folders.Add("Add the full path to Test Folder)

App.Options.Run.ViewResults = True

'*****************************************************************************************************************************
App.Test.Environment.LoadFromFile("Add full path for .ini file")
App.Test.Settings.Resources.ObjectRepositoryPath = "Add path for .tsr or obj Repository path"
App.Test.Settings.Web.BrowserNavigationTimeout = 60000
App.Test.Settings.Web.NextPageIfObjNotFound = False

'*****************************************************************************************************************************

'Declare an array with the paths and names of the tests.
dim testArray

testArray = "Give the path for Test"

Set qtResultsObj = CreateObject("QuickTest.RunResultsOptions")

   ' Open the test in QuickTest Professional.
   App.Open testArray, True
 
       
   ' Get the test object.
   Set qtTest = App.Test
   
 
   ' Set the test results options. Here the location for the test results will be set.
   qtResultsObj.ResultsLocation = "set the test location"    ' Set the results location

   'Execute the test. Instruct QuickTest Professional to wait for the test to finish executing.

    qtTest.Run qtResultsObj, True   
   
   ' Close the test.

    qtTest.Close

' Close QuickTest Professional.
  App.Quit

' Release the created objects.
set qtResultsObj = nothing
set qtTest = nothing
set App = nothing