AutoHotkey Community

iWeb_Activate(sTitle)
{
; thanks Sean
; http://www.autohotkey.com/forum/viewtopic.php?p=231093#231093
   DllCall("LoadLibrary", "str", "oleacc.dll")
   DetectHiddenWindows, On
;~    Winshow,% "ahk_id " HWND:=COM_Invoke(pwb:=iWeb_getwin(sTitle),"HWND")
;~    COM_Release(pwb)
   ;WinRestore,% "ahk_id " HWND
   WinActivate,% "ahk_id " HWND
   WinWaitActive,% "ahk_id " HWND,,5

   ControlGet, hTabBand, hWnd,, TabBandClass1, ahk_class IEFrame
   ControlGet, hTabUI  , hWnd,, DirectUIHWND1, ahk_id %hTabBand%

   If   hTabUI && DllCall("oleacc\AccessibleObjectFromWindow", "Uint", hTabUI, "Uint",-4, "Uint", COM_GUID4String(IID_IAccessible,"{618736E0-3C3D-11CF-810C-00AA00389B71}"), "UintP", pacc)=0
   {
      Loop, %   COM_Invoke(pacc, "accChildCount")
        If   paccChild:=COM_Invoke(pacc, "accChild", A_Index)
          If   COM_Invoke(paccChild, "accRole", 0) = 0x3C
          {
            paccTab:=paccChild
            Break
          }
          Else   COM_Release(paccChild)
      COM_Release(pacc)
   }
   If   pacc:=paccTab
   {
      Loop, %   COM_Invoke(pacc, "accChildCount")
        If   paccChild:=COM_Invoke(pacc, "accChild", A_Index)
          If   COM_Invoke(paccChild, "accName", 0) = sTitle   ; Change the condition here as appropriate!
          {
            COM_Release(pwb),VarSetCapacity(pwb,0),VarSetCapacity(HWND,0)
            COM_Invoke(paccChild, "accDoDefaultAction", 0)
            COM_Release(paccChild)
            Break
          }
          Else   COM_Release(paccChild)
      COM_Release(pacc)
   } 
            WinActivate,% sTitle
}