Answer / sandeep

Use QTP object model for this purpose.

Create qtp.test object.

Under this object you will get several settings like
RECOVERY scenario, ADD IN, VBS functions etc.

Make a .vbs script of these settings
Open any QTP Script and then run this code.

QTP Script will have changed resource settings. See this
sample script which does similar task

Public Job_Name_Array1
Public Excel_file_path

Excel_file_path = "G:\DATA FOR GRAPHICS JOBS.xls"

DefineValue




Dim qtApp 'As QuickTest.Application ' Declare the
Application object variable
Set qtApp = CreateObject("QuickTest.Application") ' Create
the Application object
qtApp.Launch ' Start QuickTest
qtApp.Visible = False ' Make the QuickTest application
visible
Dim qcfolderpath
qcfolderpath = "Subject\CAESAR II 5.00 QA PLAN\2 MAIN
MENU\2.1 STATIC\2.1.1 INPUT PROCESSOR\INPUT GRAPHICS
VIEW\Input Graphics QTP 9.5"

For nn = 0 To UBound (Job_Name_Array1,1)

'For nn = 2 To 1


'qtApp.Open "[QualityCenter] Subject\CAESAR II 5.00 QA
PLAN\QA JOBS WITH NEW FRAMEWORK\STATIC JOBS\BUILD CLEARANCE
WO FUNCTIONS\" & Job_Name_Array1 (nn), False ' Open the test

qtApp.Open "[QualityCenter] "& qcfolderpath & "\" &
Job_Name_Array1 (nn), False ' Open the test


For i=1 to qtApp.Test.Actions.Count
Set qtRepositories = qtApp.Test.Actions
(i).ObjectRepositories ' Get the object repositories
collection object of the "Login" action

qtRepositories.Removeall

Set qtRepositories = Nothing
Next




Set qtTestRecovery = qtApp.Test.Settings.Recovery ' Return
the Recovery object for the current test

If qtTestRecovery.Count > 0 Then ' If there are any default
scenarios specified for the test
qtTestRecovery.RemoveAll ' Remove them
End If



Set qtTestRecovery = Nothing ' Release the Recovery object

qtApp.Test.Save ' Save the test

Next


qtApp.Quit ' Exit QuickTest
Set qtApp = Nothing ' Release the Application object



Function DefineValue()

DIM objExcelApplication2
'DIM objWorkSheet
DIM Sheet2
DIM CellData2
Dim strExePath2
Dim strDrv2
Dim WshShell2
' strDrv2 = fnGetVirtualDrive()

'MsgBox strDrv
On Error Resume Next
Set objExcelApplication2 = CreateObject
("Excel.Application") '....Create Excel Object
If Err.Number <> 0 Then
Exit Function
End If

On Error Resume Next
' objExcelApplication2.Workbooks.open ("G:\DATA FOR
STATIC JOBS.xls")
objExcelApplication2.Workbooks.open (Excel_file_path)

If Err.Number <> 0 Then
MsgBox "Please ensure that you have run the
install.bat file before this run session"
Exit Function
End If

ReDim Job_Name_Array1 (0)

For xyz = 2 To 14

CellData2 = objExcelApplication2.Worksheets("Sheet1").Cells
(xyz,2).Value

Value1 = Trim (CellData2)

Job_Name_Array1(xyz-2) = Value1

ReDim Preserve Job_Name_Array1(xyz)

'MsgBox "JobName" &( xyz-2) & "is " & Job_Name_Array1
(xyz-2)

Next



objExcelApplication2.ActiveWorkbook.Close '....close the
work book
objExcelApplication2.Application.Quit '....quits
Excel

Set objExcelApplication2 = Nothing '....Clear all
the references to the objects
Set objWorkSheet2 = Nothing




End Function

We have a dynamic webtable where rows keep on adding.I have to click on particular row where the status changes to Update or Save.How do you click on Status(either it can be Update or save)

2 Answers   IBM, Infosys,

---

What type of automation frame work you are using?and why?

2 Answers   Wipro,

---

what are the functions availabla in QTP? what are the data types in QTP?

2 Answers   Spry Technologies,

---

which command u will use to access the application through descriptive programing?

7 Answers   Datamatics,

---

Please can you give where can we get good QTP Training at Hi-Tech city Hyderabad?

10 Answers  

---

What is checkpoint in qtp?

0 Answers  

---

What type of problems one will face with QTP , if too many browsers are opened at a time?

2 Answers  

---

banking domain description for software tester for interview

0 Answers   Semantic Space,

---

write a vb script to print even numbers from 1-50?

6 Answers   Kclink Technologies, Logica CMG,

---

we add library file used in test via settings or through "ExecuteFile" command. when we implement framework do we make common library file and load the same for all the test cases execution?

0 Answers  

---

When I parameterize a script then for each iteration script is executed from begining to end. If I want to execute some middle steps multiple times using Parameterization (avoiding begining and end steps), what is the solution of this (e.g. total steps are 1 2 3 4 5 and i want 2 3 4 only(not 1 nd 5)

2 Answers  

---

What are the differences between QTP 9.2 and 10? please explain e indetail......

2 Answers   Wipro,

---