Answer / reddy prasad

i did like this

invokeapplication "C:\Program Files\Mercury
Interactive\QuickTest
Professional\samples\flight\app\flight4a.exe"
Dialog("Login").Activate
Dialog("Login").WinEdit("Agent Name:").Set "rahju"
Dialog("Login").WinEdit("Password:").SetSecure
"4e885f53fbeeaf29c0e9c986b7a420312f7b66bc"
Dialog("Login").WinButton("OK").Click
Window("Flight Reservation").ActiveX("MaskEdBox").Type
"111111"
str= "Denver.Frankfurt.London.Los Angeles.Paris.Portland.San
Francisco.Seattle.Sydney.Zurich"
msgbox str
x=split(str,".")
msgbox "by spliting the string into substring 0 is : " &
x(0)
msgbox "by spliting the string into substring 1 is : " &
x(1)
msgbox "by spliting the string into substring 2 is : " &
x(2)
msgbox "by spliting the string into substring 3 is : " &
x(3)
msgbox "by spliting the string into substring 4 is : " &
x(4)
msgbox "by spliting the string into substring 5 is : " &
x(5)
msgbox "by spliting the string into substring 6 is : " &
x(6)
msgbox "by spliting the string into substring 7 is : " &
x(7)
msgbox "by spliting the string into substring 8 is : " &
x(8)
msgbox "by spliting the string into substring 9 is : " &
x(9)
Window("Flight Reservation").WinComboBox("Fly From:").Select
"Los Angeles"
ar = Window("Flight Reservation").WinComboBox("Fly
From:").GetContent
'ar = Window("Flight Reservation").WinComboBox("Fly
From:").GetROProperty("text")

str=Array( "Denver","Frankfurt","London","Los
Angeles","Paris","Portland","San
Francisco","Seattle","Sydney","Zurich")
If ar = x(9) Then
msgbox "pass"
else
msgbox "fail"
End If
Window("Flight Reservation").Close


but no result

what is the process to follow between writing the test cases & then atomating it?

1 Answers  

---

give me descriptive programing code sample flight application in qtp?

8 Answers   CA, IBM,

---

How you automate testscripts one by one or modukewise or all at once

1 Answers   Diebold,

---

WHAT IS A TEST STRATEGY & WHAT IS THE DIFFERENCE BETWEEN TEST STRATEGY & TEST PLAN?

21 Answers   ABM, AZTEC, CTS, Infosys, Nihilent, Orange,

---

What is Test Fusion Report in QTP?

0 Answers  

---

how to pass parameters from one action to another using output parameters I am not calling action 2 from action 1, they are being called individually I need syntax please .. Requirement: Action 1 customer = Browser(" ").Page(" ").Link(" ").GetROProperty("value") I want to use the value stored in customer in Action 2 I do not want to use any of these actions as re-usable actions

2 Answers  

---

How the smart identification is used in real time?Please explain with an example

0 Answers   Wipro,

---

How to check the URL using Automation tool QTP

2 Answers  

---

How can we translate the steps between the Keyword and Expert Views?

1 Answers  

---

How to connect to data base?

2 Answers  

---

what is the difference between Reusable action and external action?

2 Answers   HCL,

---

in howmany ways you perfrom batchtesting

6 Answers   Lehman Brothers,

---