write a function to read the items from Combobox of Flight
Reservation
application and save in excel.
Answers were Sorted based on User's Feedback
Answer / kishan
allItems=Browser().page().webComboBox().getROProperty("all
items")
arr=split(allItems," ")
'create excel appl object
set xlo=CreateObject("Excel.Application")\
xlo.visible=True
set wbo=xlo.Workbooks.open("D:\QTP\TestData\abcdef.xls")
set wso=xlo.worksheets("Sheet1")
for i=0 to ubound(arr)
j=i+1
wso.cells(j,1)=arr(i)
next
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / lavanya
This too works....
r=1
Function Fly_from()
Window("Flight Reservation").Activate
Window("Flight Reservation").WinComboBox("Fly From:").Drag 10,10
List =Window("Flight Reservation").WinComboBox("Fly From:").GetRoProperty("all items")
Cnt=Window("Flight Reservation").WinComboBox("Fly From:").GetItemsCount
msgBox List
msgBox Cnt
For i=0 To Cnt-1
Wso.cells(r,1).value=Window("Flight Reservation").WinComboBox("Fly From:").GetItem(i)
r=r+1
Next
End Function
Set odesc=CreateObject("excel.application")
odesc.visible=True
odesc.workbooks.open "path of excel file to store the list items"
Set Wso=odesc.worksheets("Sheet1")
call Fly_from()
| Is This Answer Correct ? | 2 Yes | 0 No |
a=browser("vtiger CRM - Commercial").Page("vtiger CRM - Commercial").WebList("login_theme").GetROProperty("all items")
b=split(a,";")
Set obj=createobject("excel.application")
Set obj2=obj.Workbooks.Open("C:UserspushkarDesktopBook1.xls")
Set obj3=obj2.Worksheets("Sheet1")
For i=0 to ubound(b)
j=i+1
obj3.cells(j,1)=b(i)
obj2.Save
Next
| Is This Answer Correct ? | 0 Yes | 0 No |
It is very important too save workbook else sheet will be empty.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / gourav
can anyone plz tell me the answer to this question?
| Is This Answer Correct ? | 0 Yes | 2 No |
write script for how to add function library in QTP
describe some problem that u had with automation testing tool?
What is method name to compare two XML files.
What is output value?
can u put checpoints for moving images
Older version QTP is 8.2 and New version QTP is 9.2. My question is, Why it is QTP 9.2, why not 8.3,8.4 .... why it is not something ?
How the automated tests in org
What is the difference between a Test and a Business Component? Is it necessary to use Business Component while testing an application in the real time?
What are objects? how do you select the unknow object?
how can we handle errors other than using recovery scenerios in qtp
can u explain relative path architecture framework in qtp?
1. Pls can anyone give me the descriptive programing script to find the number of edit boxes in a login window in flights reservation (windows application only not web). 2. Using descriptive programing, how do you handle changing URLs. Pls anyone, very urgent