Saturday, June 11, 2011

Close Quality Center Browsers Window

Dim intIndex
Set oDesc=Description.Create
oDesc(“micclass”).Value=”Browser”
intIndex=0
While Browser(“micclass:=Browser”,”index:=”&intIndex).exist(0) and intIndex
If instr(1, Browser("micclass:=Browser","index:="&intIndex).getRoProperty("name"),"Quality Center") = 0 Then
SystemUtil.CloseProcessByHwnd( Browser("micclass:=Browser","index:="&intIndex).getRoProperty("hwnd"))
else
intIndex=intIndex+1
End if
wend

1 comment:

  1. An ios course introduces Apple app development fundamentals in a simple way. It focuses on Swift syntax and interface building. This ios course includes guided hands-on sessions. It strengthens mobile programming knowledge. Learners develop real-time applications. It is dependable.

    ReplyDelete