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...


Hello! i am having two comboboxes.Each having 10 items in
it.when i select first item in first combobox,it is not
similar in the second combobox.for ex in first combo if it
is Hyderabad,in second it should be some chenai or some
other item .Write a VBSCRIPT for that?

Answers were Sorted based on User's Feedback



Hello! i am having two comboboxes.Each having 10 items in it.when i select first item in first com..

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

Is This Answer Correct ?    7 Yes 1 No

Hello! i am having two comboboxes.Each having 10 items in it.when i select first item in first com..

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.

Is This Answer Correct ?    3 Yes 2 No

Hello! i am having two comboboxes.Each having 10 items in it.when i select first item in first com..

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

Is This Answer Correct ?    0 Yes 2 No

Post New Answer

More QTP Interview Questions

any one can send me the concepts of qtp

0 Answers  


there is 3 flash player buttons does QTP identify them or not else we have to do install anything related that software if we have to install what is that software and how we install it into QTP8.2 GIVE ME EXCAT ANSWER IF U KNOW.

1 Answers  


For Regression testing already written test cases are sufficient?

2 Answers   CTS,


Hi I'm a beginner in QTP. So far I'm ok with Descriptive but stuck while implementing Hybrid Frame work. 1. I have created a Keyword file with .vbs ext set home=description.create home("title").value="Welcome to feests" set reglink=description.create reglink("name").value="register yourrestaurant / take away" set fbusname=description.create fbusname("name").value="business_name" set dispname=description.create dispname("name").value="display_name" set restchkbox=description.create restchkbox("name").value="restaurant" set cuiscate=description.create cuiscate("name").value="cuisine_categery1" set addline1=description.create addline1("name").value="address_line1" set pstcode=description.create pstcode("name").value="address_postcode" set cntry=description.create cntry("name").value="address_country" set mlandno=description.create mlandno("name").value="landline_no" set emailadd=description.create emailadd("name").value="email" 2. I have created an Function Library file as follows Function launch() bro="C:\Program Files\Internet Explorer\iexplore.exe" url="http://www.feests.com/" invokeapplication bro&" "&url Browser(home).page(home).Link(reglink).click End Function Function restregistration(karthik, teja, Ameerpet, UK) Browser(home).page(home).WebEdit(fbusname).set "karthik" Browser(home).page(home).WebEdit(dispname).set "teja" Browser(home).page(home).WebCheckBox(restchkbox).set "ON" Browser(home).page(home).WebList(cuiscate).Select "Indian" Browser(home).page(home).WebEdit(addline1).set "Ameerpet" Browser(home).page(home).WebEdit(pstcode).set "UK" Browser(home).page(home).WebList(cntry).select "United Kingdom" Browser(home).page(home).WebEdit(mlandno).set "023775347" Browser(home).page(home).WebEdit(emailadd).set "email@gmail.com" End Function 3. This is how I have called the keywords and Functions in QTP executefile"C:\Documents and Settings\karthik\Desktop\keywords.vbs" executefile"C:\Documents and Settings\karthik\Desktop\functions.vbs" launch restregistration karthik, teja, Ameerpet, UK, "email@gmail.com" Now the issue is, I'm trying to enter the email ID in WebEdit field. But I dont know what is the mistake I did, if I run the script in QTP it is showing following error Error: Expected identifier Line (2): "executefile"C:\Documents and Settings\karthik\Desktop\functions.vbs"". Can someone help me fix this, please!!?

0 Answers  


Hi, every one aim new to automation testing(QTP),aim looking for software versions any. If any one can HELP me that will be great. Thank u.(9620427211,Bangalore)

0 Answers   ME,


can we create recorset with out using database connection in vbscript?

1 Answers   CSS, CSS Corp,


in my system object spy show the web application as a window based propeties ex:winedit like that and also not recording scripts also so what should i do

2 Answers  


Hi can anyone pls suggest how to fetch username(system login name)and system name in to qtp.I am not using TD or QC.Thx

5 Answers  


How do you create regression test packs?

0 Answers  


How do you create new test sets in td?

0 Answers  


Give me brief idea about QTP automation object model?

5 Answers   TCS,


hi i want license key for qtp 9.2 pls its adjust product name : quick test professional locking code :8 - 54A6A license type : seat license maintenance number : 88888888-8888 pls send license key to my email id borusu.ramkumar@gmail.com

0 Answers  


Categories