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
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 |
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 |
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 |
Waht is Test Report , What it consists?
how to get childobject from .net application. i tried but its showing child object count zero. but window has child objects.the following script i written... pls help me how to get. set parent=SwfWindow("winodw name") CheckObjectDescription parent, SwfButton Public Function CheckObjectDescription(parent, oDesc) Set oDesc = Description.Create() oDesc("micClass:").Value ="Swfbutton" Set children = parent.ChildObjects(oDesc) cntObj=children.count msgbox(cntObj) End function
How may types of defects identify application or your currently working application?pls give me answer..
Hi, I Need code to click the webbutton inside of webtable. I need to click a particular 'Edit' webbutton inside of webtable. For Example... Having 5 Rows and 10 Columns. 'Edit' webbutton are placed in 10th Column. I need to click the 3rd row 'Edit' button with unique value. Browser("....").Page("...").Frame("...").WebButton("btn_Edit ") I Tried with below code: Set objButton = Browser("...").Page("...").Frame("...").WebTable("...").Chil dItem(3,10, Webbutton,0).Click - Not working this code :( Anyone can help me to sort out this simple issue ???
Have you used xml check point in your project?
Define Environment Variable in UFT and its uses?
How can i open a file in Textpad and replace a string with another using QTP
In this bellow script QTP is not able to getting no. of Links from my Browser. Set desc=description.create desc("micclass").value="Link" Set obj=Browser("creationtime:=0").page("title:=.*").childobjects(desc) msgbox obj.count I am getting "General Run Error".Why QTP is not supporting my Browser,but its running fine in other system.Please help me to overcome this problem.
Please explain how to open with notepad of saved html file by right click option using QTP
Hi all, i have installed QTP8.2 in my system. but script is not generating while recording. What is the problem? is any file missing? pls let me know anybody...Thnaks
Explain in brief about the quicktest professional automation object model?
How do u use Database checkpoints and what are the use?