Gegenwärtig verwende ich den folgenden Code, um alle Browser mit Ausnahme des ALM-Browsers zu schließen, von dem aus ich die Testsuite ausführe. Wenn ich die Suite jedoch über ALM ausführe, werden mit dem folgenden Code zwei Browser identifiziert: der ALM-Browser und der Testfall-Browser. Zunächst wird der Testfall-Browser geschlossen, und wenn die Iteration für den ALM-Browser ausgeführt wird, wird angegeben, dass der Browser nicht identifiziert wird, wenn versucht wird, den Namen des Browsers zu finden. Ich bin nicht sicher, warum es als Browser gezählt wird, wenn es später nicht identifiziert werden kann. Irgendwelche Gedanken, wie man das löst?

 Dim oBrDes  
 Dim oBrObjList  
 Dim objIndex  

 Set oBrDes=Description.Create  
 oBrDes("micclass").Value = "Browser"

 Set oBrObjList=Desktop.ChildObjects(oBrDes)  
  N = oBrObjList.count-1 
 For objIndex=0 to N 
  If(oBrObjList(objIndex) is nothing) then
  'Do Nothing
  Else
  name = lcase(oBrObjList(objIndex).GetROproperty("name"))
  If (Instr(1,name,"quality center") <> 0 or Instr(1,name,"automatic runner") <> 0 or name <> "") then  
   value = oBrObjList(objIndex).getroproperty("visible")
   If(trim(value) <> "True") then
   'Do Nothing
   Else
            oBrObjList(objIndex).close  
    End If
   End If  
   End If
 Next  

 Set oBrObjList=Nothing  
 Set oBrDes=Nothing