Interested to Buy Any Domain ? << Click Here >> for more details...
Suppose there are 10 browsers opened on desktop. I want to
close all browsers except one browser in QTP. Can any one
give the code for this?
- 7 Answers
- 30231 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / sharath
you can use descriptives programming concepts.
"CreationTime" is a QTP browser property, which indicates
the order in which browsers were opened.
To close 1st browser --> Browser("CreationTime:=0").Close
2nd browser --> Browser("CreationTime:=1").Close.
you can use a loop to close other 9 browsers..
| Is This Answer Correct ? | 17 Yes | 3 No |
Answer / nihar ranjan sethy
set odesc=description.create
odesc("micclass").value="browser"
set x=desktop.childobjects(odesc)
for i=10 to 2 step-1
x(i).close
next
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / rico
just made a small correction. Here goes the updated answer
Set browserDesc = Description.Create()
browserDesc(”application version”).Value = “internet
explorer 6"
Set Allbrowsers = DeskTop.ChildObjects(browserDesc)
BrowserCnt = Allbrowsers.Count
For i = 0 To (browserCnt -2)
Allbrowsers(i).Close
Next
Set browserColl = Nothing
Set browserDesc = Nothing
| Is This Answer Correct ? | 7 Yes | 7 No |
Answer / sireesha
If you want to close all browsers except gmail browser then you will follow this code.
set ObjDesk = Description.Creation
ObjDesk("micclass").Value="Browser"
set ObjDec =Desktop.ChildObjects(ObjDesk)
BroCount=ObjDec.Count
msgbox BroCount
if BroCount >0 then
for i=BroCount-1 to 0 step-1
if Instr(1,Browser("CreationTime=&i").GetRoproperty("name"),"gmail")=0 then
Browser("CreationTime:=&i").Close
End If
Next
End If
| Is This Answer Correct ? | 2 Yes | 2 No |
Answer / vijay
While Browser("creationtime=0").exist(0)
Browser("creationtime=0").close
wend
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / shankar
set brow=description.create
brow("micclass").value="browser"
set brows=Desctop.childobjects(brow)
for i=0 to brows.counts-1
browser(brow).close
please reffer this and if it is wrong give me clarification.
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / rico
Assuming all 10 browsers are IE6
Set browserDesc = Description.Create()
browserDesc(”application version”).Value = “internet
explorer 6″
Set Allbrowsers = DeskTop.ChildObjects(browserDesc)
BrowserCnt = Allbrowsers.Count
For i = 0 To (browserCnt -2)
Allbrowsers(i).Close
Next
Set browserColl = Nothing
Set browserDesc = Nothing
| Is This Answer Correct ? | 4 Yes | 8 No |
if numbers are always changing write a script for that
I have recorded a test over web application(with IE6.0) in analog mode. But, while running it my test gets failed. Why? (Note: my systray has 3 open web applications)
How to retrive the property of an object?
Can any body please tell me the steps of keyword driven frame work in qtp. My mail is saswat445@gmail.com please send some materials on keyword driven testing in qtp. thanks a lot...
How to load the object repository at run time?
WHICH functionalities of QTP used in Banking project?
what is object spy
what is the syntax for regular expression in QTP? how to create user defined functions in QTP?
What is the current version of QTP and now it is the product of Mercury or HP
what is vmodel?advantages and disadvantages of vmodel?
After running scripts how you report results ,there is any specific report form
How to call script1 into script2?
WinRunner 
