This function very often crashes browser
On Thu, Sep 4, 2008 at 11:22 AM, Jayadev <[EMAIL PROTECTED]> wrote:
>
> Hi All,
> There is a lovely sibgle line code that closes all browsers
>
> SystemUtil.CloseProcessByName("IEXPLORE.EXE")
>
>
> Jayadev
>
> On Sep 1, 11:41 am, "Srinivas Pavuluru" <[EMAIL PROTECTED]> wrote:
> > use the following function for close all browsers.. instead of creation
> > time.
> >
> > Creation time is the one QTP to identify browser opened sequence.. Which
> is
> > not displayed in properties.. If you record your script on more than one
> > opened browser of similar names, you will see creation time property, by
> > right clicking and viewing on recorded script browser objects. Following
> > function i found from QTP resources. you can use it by calling function
> > name within your script.
> >
> > *Public function close_all_browsers()
> > dim bcount, bcount2
> > if(Browser("micclass:=Browser").exist) then
> > Browser("micclass:=Browser").close
> > end if
> > wait(2) 'wait for closing browsers to close
> > bcount = 0
> > while (Browser("micclass:=Browser","location:=" & bcount).exist)
> > bcount=bcount+1
> > wend
> > if (bcount>1) then
> > 'msgbox "Warning: " & bcount & " browser windows found"
> > end if
> > for bcount2 = 0 to bcount -1
> > Browser("micclass:=Browser","location:=0").close
> > next
> > end function
> > *
> > Thanks & Regards
> > Srinivas P
> > On 8/31/08, Ashwini Khanna <[EMAIL PROTECTED]> wrote:
> >
> >
> >
> >
> >
> > > Hey Dmitry,
> >
> > > I found this code on your blog-site to close all browsers.
> >
> > > ----------------------------------------------------------------
> >
> > > While Browser("CreationTime:=0").Exist
> > > Browser("CreationTime:=0").Close
> > > Wend
> > > ----------------------------------------------------------------
> >
> > > This code works well and closes all instances of IE. But what question
> > > arises in my mind is - when I SPY on IE Browser I can't see any
> property
> > > called "CreationTime"; so how does it work?
> >
> > > Regards,
> > > Ashwini- Hide quoted text -
> >
> > - Show quoted text -
> >
>
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups "QTP
- HP Quick Test Professional - Automated Software Testing" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
-~----------~----~----~----~------~----~------~--~---
