Interested to Buy Any Domain ? << Click Here >> for more details...
How to Close all browsers in reverse order.
- 3 Answers
- 9228 Views
- Marlabs, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / suresh
Set oBrowser = Description.Create
oBrowser("micclass").value="Browser"
Set oAllObjects = Desktop.ChildObjects(oBrowser)
msgbox oAllObjects.count
For i = 0 to oAllObjects.count-1
Browser("CreationTime:=" & i).close
Next
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / suresh
Set oBrowser = Description.Create
oBrowser("micclass").value="Browser"
Set oAllObjects = Desktop.ChildObjects(oBrowser)
msgbox oAllObjects.count
For i = oAllObjects.count-1 to 0
Browser("CreationTime:=" & i).close
'msgbox (Browser("CreationTime:=" & i).GetROProperty
("Title"))
Next
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sri
When each browser is opened using QTP, each browser would
have a creation time property associated with it. You can
take this property to close browsers in which ever order
you need.
| Is This Answer Correct ? | 2 Yes | 5 No |
explain structured testing? plz guys with exp. do answer
i need qtp tutorial. pls send it to sridhar.k151@g mail.com
What is output value?
Explain QTP Testing process ?
What is Cross browser testing? Does UFT support it?
several browsers opened. write QTP script to close all browsers except gmail.
Hi, Can any one explain what is mean by Driver Script? is it AOM?
I have many listboxes in my application. I have to check whether the contents inside the listboxes are in sorted order or not..can anyone please send the code as early as possible
what is the extension of action script template?
What is the basic concept of qtp?
QTP in mumbai
How can we retrieve the Bug Ids which are open&Reopen in status through QTP scrit?Please find the script which i tried... Dim objBugFactory, objBug Dim BugId Set TDConnection = QCUtil.TDConnection Set objBug = TDConnection.BugFactory If QCUtil.IsConnected then Reporter.ReportEvent 0, "Connected", "Connected to server: " + QCUtil.TDConnection.ServerName + chr (13) +"Project: " + QCUtil.TDConnection.ProjectName + chr (13) + "Domain: " + QCUtil.TDConnection.DomainName Reporter.ReportEvent 0, "Current time on server is","==>" & TDConnection.ServerTime Else Reporter.ReportEvent 1, "Not connected", "Not connected to Quality Center" End If If mybug.Status="Open" Then BugId=mybug.DefectId MsgBox BugId End If 'OR**********************************--------------------- -----********************************** If Bug_Fields("BG_STATUS").Value ="Open" Or "Re Open"Then BugId=Bug_Fields("BG_BUG_ID").Value MsgBox BugId End If
WinRunner 
