Answer / puruhsotham

Hi,
It is very much possible to get List Items by passsing
Index from Excel.

Syntax:
Browser("e-OSCAR").Page("e-OSCAR").Frame("Main").WebList
("Listbox").Select 1 (One is Index, else u canpass variable
after importing value to variable )

Answer / azeemuddin

thanks alot

i tried

Browser("e-OSCAR").Page("e-OSCAR").Frame("Main").WebList
("Listbox").Select "#1"

worked grt

Answer / babu

Hi,
Even i have the same problem. I have to get the values from
the weblist which i am not able to. I tried with the script
mentioned above. It is not working for me.
Can anyone help me out to retrieve the data from the
weblist.

Answer / nilanjan saha

Suppose we have total 14 items in the weblist...It means that

x=Browser("XYZ").Page("XYZ").Frame("something").WebList
("Listbox").GetROProperty("items count")

msgbox x ' It should print 14

if you want to print all the values of the weblist then use
for loop for that purpose:

For i=1 to x
msgbox Browser("XYZ").Page("XYZ").Frame("something").WebList
("Listbox").getItem(i)
Next

Hope above code will help...

Regards,
Nilanjan

Answer / jaipalreddy

try with this
option explicit
dim a
a=Browser("name:=Google").page("name:=Google").WebList
("name:=State).GetItem(1)
msgbox(a)

How to recognise the webelement and verifying that webelement is enabled?

0 Answers  

Please explain me i am using QTP 9.5 ,i am creating re usable scripts,i have to pass data from one local sheet to another local sheet.for example i am creating emploee information, (data is in action 2 local sheet),In this data table emplyeee number will get,i have to pass employee number to another reusable script search data (action2 local data sheet)

2 Answers  

• Re –Engineering the regression testing from 0% to 60% automation. This has saved 4-mandays in every release. what doeas this statement means

2 Answers   Infosys,

What is difference between design time and run time data table?

0 Answers  

what is the exact Diff. Between Test and Component in QTP?

1 Answers  

can somebody send the script to write a multiplication table in notepad through qtp

3 Answers   AppLabs,

Why you have to add the specific add in in QTP? My answer is to recognize the specific objects we have to add the add-in in QTP...but he asked again after adding addin how qtp recognize the objects successfully? what is there in the add-in ?

1 Answers   CTS,

How do you script a nested loop in QTP? I am showing a snipet of my code. Any suggestions to help me get this to work would be great appreciated! STEP A - Customer Number: No loop - ISBN: Loop STEP B - Customer Number: Loop - ISBN: Nested Loop Here is the code I am using now. I am using i for the loop and j for the nested loop in STEP B of my script. =========================================== 'CREATE AN ADDITIONAL CUSTOMER Dim myNum, RowNum, RowCnt2, val2, total, i DataTable.ImportSheet "C:\QOE Data - UAT1.xls" ,"Data" ,"Global" RowCnt2 = DataTable.GetRowCount i = 1 DataTable.SetCurrentRow(i) ' Set row to one Do while Not i > RowCnt2 i=i+1 DataTable.SetNextRow MsgBox Datatable.Value("Customer_Num") Msgbox i Msgbox RowCnt2 If Not i > RowCnt2 then val2=datatable.Value("Customer_Num","Global") OracleFormWindow("Sales Order").SelectMenu "File->New" OracleFormWindow("Sales Order").OracleTabbedRegion("Order Information").OracleTextField("Customer Number").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Order Information").OracleTextField("Customer Number").Enter val2 End If 'CREATE SECOND ISBN LIST DataTable.ImportSheet "C:\QOE Data - UAT1.xls" ,"Data" ,"Global" Dim j, RowCnt3, val3 RowCnt3 = DataTable.GetRowCount For j = 1 To RowCnt3 DataTable.SetCurrentRow(i) ' datatable.getSheet("DataTable").setNextRow If Trim(DataTable("ISBN",dtGlobalSheet)) = "" Then j = j - 1 Exit For End If Next 'Define ISBN rows If RowCnt3 <> j Then RowCnt3 = j End If 'Loop through ISBN rows For j = 1 To RowCnt3 DataTable.SetCurrentRow(i) val3 = Datatable.Value("ISBN","Global") msgbox j If j = 1 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item").Enter val3 else If j < 16 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_"&i).SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_"&i).Enter val3 else If RowCnt1 => 16 Then OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").InvokeSoftkey "DOWN" OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").SetFocus OracleFormWindow("Sales Order").OracleTabbedRegion("Line Items").OracleTextField("Ordered Item_15").Enter val3 end if end if End If Next 'EXIT APP msgbox i loop Browser("Browser").Page("Oracle Applications 11i").Sync Browser("Browser").Close ========================================== It isn't working correctly in my nested loop in STEP B (for ISBN). Any ideas?? Thanks! SBsteve

0 Answers  

how to prepared for first for the first interview?

0 Answers   Collabera,

does qtp need record and playback in realtime. plz tell exactly wat happens

3 Answers   HP,

If object is not recognized by qtp but the object is standard object what is your approach?

0 Answers  

example-date format is 01-jan-09 in QTP.How to convert this format to 01-01-09?

9 Answers   Tech Mahindra,