Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

Flight reservation using input and output parameter script.

Answer Posted / bindu

Dialog("Login").WinEdit("Agent Name:").Set
DataTable("username", dtLocalSheet)
Dialog("Login").WinEdit("Agent Name:").Type micTab
Dialog("Login").WinEdit("Password:").SetSecure
DataTable("password", dtLocalSheet)
Dialog("Login").WinButton("OK").Click
Window("Flight Reservation").ActiveX("MaskEdBox").Type "091012"
Window("Flight Reservation").WinComboBox("Fly From:").Select
"Frankfurt"
Window("Flight Reservation").WinComboBox("Fly To:").Select
"Los Angeles"
Window("Flight Reservation").WinButton("FLIGHT").Click
r=Window("Flight Reservation").Dialog("Flights
Table").WinList("From").getroproperty("selection")
msgbox r
DataTable("Result", dtLocalSheet)=r
Window("Flight Reservation").Dialog("Flights
Table").WinList("From").Select "20334 FRA 12:12 AM LAX
07:23 PM AA $112.20"
Window("Flight Reservation").Dialog("Flights
Table").WinButton("OK").Click
Window("Flight Reservation").WinEdit("Name:").Set "bindu"
Window("Flight Reservation").WinButton("Insert Order").Click

Is This Answer Correct ?    1 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

How do I generate Test Results window using descriptive method ( run time ) after my test execution process? Please have a look of my below code. ========================================================= Dim qtApp Dim qtTest Dim qtResultsOpt Set qtApp = CreateObject("QuickTest.Application") qtApp.Launch qtApp.Visible = True qtApp.Options.Run.CaptureForTestResults = "Always" qtApp.Options.Run.RunMode = "Fast" qtApp.Options.Run.ViewResults = True qtApp.Open "C:\Automation\Example", True Set qtTest = qtApp.Test qtTest.Settings.Run.OnError = "NextStep" Set qtResultsOpt = CreateObject ("QuickTest.RunResultsOptions") qtResultsOpt.ResultsLocation = "C:\Automation\Example\Res1" qtTest.Run qtResultsOpt MsgBox qtTest.LastRunResults.Status qtTest.Close Set qtResultsOpt = Nothing Set qtTest = Nothing Set qtApp = Nothing ========================================================== This code is working fine, but Test Result window is not displaying after execution. Anybody can please help me regading the same. Thanks Akshaya Madali Capgemini India Pvt Ltd 9823213538

4304


explain how to write vb script in qtp?when will you write own script?

2323


what is output value in QTP and how it can be used in automation testing

1996


What is keyword view?

1010


What is quicktest professional (qtp window?

1032


Print the Prime numbers in below format only up to 20(Need commas also) 1,2,3,5,7,9,11,13,17,19

1636


What is action? How many types of actions are there in qtp?

1099


How to add synchronisation points in qtp?

1086


How to get the format of a webedit class in qtp. How can i know that particular webedit accept what type of format like "mm/dd/yyyy" or "$" or Alphanumeric

2076


How to read a text file from QC using QTP. I would like to do something like this. But instead read a file from QC and NOT from my local drive. Set fso = CreateObject("Scripting.FileSystemObject") Set InputFile = fso.OpenTextFile("C:\test.txt", ForReading) Thanks

3267


If the objects hierarchy is changing from build to build, then how you will handle that condition?

1056


How will you report the bug and explain the defect tracking sheet you handled?

3092


What is the short cut keys for the following?

1126


What is qtpro?

1065


When I click on a link in web page.Link should open in new window.can anyone please let me know the script for this ---Koti

2927