0
QTPの品質センターを除くすべてのブロワーを閉鎖するにはどうすればよいですか?
以下のコードがありますが、オブジェクトが表示されないためにエラーが発生することがあります。
Dim TempIndex,oDesc
'1) Create a Browser object'
Set oDesc=Description.Create
oDesc("micclass").Value="Browser"
TempIndex=0
'2) loop and Check if a browser is open'
While Browser("micclass:=Browser","index:="&TempIndex).exist(0) and TempIndex<Desktop.ChildObjects(oDesc).count
'3) Close the browser if its not Quality center '
If instr(1, Browser("micclass:=Browser","index:="&TempIndex).getRoProperty("name"),"HP Application Lifecycle Management 12.50") = 0 Then
Browser("micclass:=Browser","index:="&TempIndex).close
else
TempIndex=TempIndex+1
End if
Wend
私の[**答え**](http://stackoverflow.com/aをチェック/ 32056517/1652222)と同じ質問があります。 – ManishChristian
ありがとうございます。しかし、前にその投稿を見た後、私はすでに試しましたが、それは私にとってはうまくいかなかったのです。 – Ramesh
それはうまくいかなかったという意味ですか? ALM Explorerをインストールしましたか? – ManishChristian