Parent page: GUI Recognition with TestComplete

Close all browser windows

Description

In the example presented, Internet Explorer browser program (executable name) is hard-coded (as “iexplore”).
Closing begins from first instance number (i.e. a sequential number of the process in memory, if a few were loaded).
In first attempt, .Close method is used, which allows an application to finalize.
Second attempt uses .Terminate method. Any unsaved data will be lost.

Implementation

Public Const syncTimeShort = 5
'
Public Function wbCloseAll()
 Dim IEProcess
 Dim PropNames, PropValues
 While True
 PropNames = Array("processname", "index")
 PropValues = Array("iexplore", 1)
 Set IEProcess = Sys.FindChild(PropNames, PropValues, 1, True)
 If Not IEProcess.Exists then
 Exit Function
 End if 
 IEProcess.Close(syncTimeShort*1000)
 If IEProcess.Exists then
 IEProcess.Terminate
 End if 
 WEnd
End Function