Answer / rayudu

suppose in our flight reservation window "Fly from"
and "Fly To" comboboxes values should not be same.ok.
In taht situation below code will give all fail status
because Our flight reservation window has both values same

Just understand the code and implement it on ur application

SystemUtil.Run "C:\Program Files\Mercury
Interactive\QuickTest
Professional\samples\flight\app\flight4a.exe","","C:\Program
Files\Mercury Interactive\QuickTest
Professional\samples\flight\app\","open"
Dialog("Login").WinEdit("Agent Name:").Set "rayudu"
Dialog("Login").WinEdit
("Password:").SetSecure "49192ea21d0ec541ad12119e494c01ba2bb
d510b"
Dialog("Login").WinButton("OK").Click

a=window("Flight Reservation").WinComboBox("Fly
From:").GetROProperty("items count")

b=window("Flight Reservation").WinComboBox("Fly
From:").GetROProperty("all items")

a1=window("Flight Reservation").WinComboBox("Fly
To:").GetROProperty("items count")

b1=window("Flight Reservation").WinComboBox("Fly
To:").GetROProperty("all items")

spl=split(b,vblf)
spl1=split(b1,vblf)
For i=0 to a-1
val=spl(i)
msgbox val
val1=spl1(i)
msgbox val1
If val=val1 Then
reporter.ReportEvent micFail,"Step1","Test case is
fail"
Else
reporter.ReportEvent micPass,"Step1","Test case is
pass"
End If
Next

Answer / ravikumar

Lets take Combo1 & Combo2

If u r selecting < Item1 > from Combo1 the same item1
should not be present in the Combo2 right..
if it is the case

step1) select Item1 from Combo1
Step2) write a function to validate the given item i.e
passed as perameter(Item1)by getting the innertext of the
Combo2 and use Instr function to find Item1 is there in the
inner text..if no Pass...If yes Fail.........


if the case is
the item selected in the combo2 should not be <item1>
then

get the selected item from the Combo2

strcomp("selected item","item1")

if yes fail
if no pass.

Answer / bfakruddin

We can do this in two ways...

1. Get all items from two combo boxes and store in two
separate arrays or in DataTable... "Your convenient process"

2. Validate one after the other dynamically in Loop...

I will keep one way here which I feel Logically better

2.

dim exp,act,cmb_1,cmb_2

cmb_1_cnt=browser("...").page("....").weblist
("...").getitemcount

for i=1 to cmb_1_cnt

exp=browser("...").page("...").weblist("...").getitem(i)

call cmb_2_Func()

reporter.reportevent micPass,"Test is Passed","Two
comboBoxes contain Different Items"

Next

Function cmb_2_Func()

cmb_2_cnt=browser("...").page("...").weblist
("...").getitemcount

for i=1 to cmb_2_cnt

act=browser("...").page("...").weblist("...").getitem

if (act=exp) then

reporter.reportevent micFail,"Test is Failed","Two
ComboBoxes contain Same Item"
End For

End if

Next

End Function

It is very difficult to test in manual for that we go to DATA DRIVEN TEST.

3 Answers  

---

If we put all properties in mandatory and assistive list of Normal Identification, Do we still need Smart?

0 Answers  

---

What is the another extension name of library file. If that is exist than what's the difference between them.

2 Answers   Synechron,

---

what about f2&f6 function keys

1 Answers  

---

what are the different kinds of frameworks in automation?

1 Answers   Accenture,

---

What is the registration process and examination fees?

0 Answers  

---

VM1 = "Invalid username or password. Please try again. " VM2 = "Email id is required.Password is required. " VM3 = "Email id is an invalid e-mail address.Password is required. " VM4 = "Password is required. " VM5 = "Email id is required. " VM6 = "Email id is an invalid e-mail address. " 'Rowcount of the Local sheet Rowcount = DataTable.GetSheet("Invalid login transactions").GetRowCount 'Valid emailid and Password Emailid = "test@iteamic.com" Password = "Password0" 'For i = 1 to Rowcount 'Parameterised Email_id Browser("Browser").Page ("Page").WebEdit("emailAddress").Set DataTable("Email_id", dtLocalSheet) EID = Browser("Browser").Page ("Page").WebEdit("emailAddress").GetRoProperty("value") 'Parameterised Password Browser("Browser").Page ("Page").WebEdit("password").Set DataTable("Password", dtLocalSheet) PWD = Browser("Browser").Page ("Page").WebEdit("password").GetROProperty("Value") If EID = Emailid And PWD = Password Then Reporter.ReportEvent micPass, "EID & PWD check", "Email id and Password is correct, One iteration of Invalid login attempts is not being executed" Else Browser("Browser").Page("Page").WebButton ("Sign-In").Click 'Output value exported to the local sheet Browser("Browser").Page ("Page_2").Output CheckPoint("Home page_Sign in") 'Storing the output value in a variable(OUTPUT OUTPUT = Datatable.GetSheet ("Invalid login transactions").Getparameter ("Validation_message_signin").value 'comparing the Variable Output and the Validation message for a given input If OUTPUT = VM1 Then Reporter.ReportEvent micPass, "VM1", "Invalid username or password. Please try again. " else if OUTPUT = VM2 Then Reporter.ReportEvent micPass, "VM2", "Email id is required.Password is required. " else if OUTPUT = VM3 Then Reporter.ReportEvent micPass, "VM3", "Email id is an invalid e-mail address.Password is required. " else if OUTPUT = VM4 Then Reporter.ReportEvent micPass, "VM4", "Password is required. " else if OUTPUT = VM5 Then Reporter.ReportEvent micPass, "VM5", "Email id is required. " else if OUTPUT = VM6 Then Reporter.ReportEvent micPass, "VM6", "Email id is an invalid e-mail address. " else Reporter.ReportEvent micFail, "EID & PWD check_FAIL", "Validation message checkpoint failed. The captured v msg is not required" End if End if I am getting syntax error saying "Expected 'End If'" at the last line, Why is this? Kindly explain...

1 Answers  

---

what is smart identification in qtp? pls any give details? thanks in advance

3 Answers   IBM,

---

What expansion of "MIC" in MICPASS (TEST ReportPAGE)

11 Answers   TCS,

---

I want to export the datasheet to excel.Instead of total file it exports only data without headers.How to solve this problem?

1 Answers   FAI,

---

WHAT IS THE SIZE OF OBJECT REPOSITORY USING IN YOUR COMPANY? Can any body tell me answer of this quation........

11 Answers   Ness Technologies,

---

Write the Test Cases for ATM(Any Time Money)

3 Answers   SpaceLabs,

---