15 мая "Исходники.РУ" отмечают 20-летие присутствия в сети!
Поздравляем всех причастных и неравнодушных с юбилеем сайта!
И огромное спасибо всем, кто был с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту


Интерфейс для прослушивания событий запущенного Internet Explorer.


Авторы: Venu Vemula & Robert Walker.

Требования: Internet Explorer 4 (или выше)

Приконнектиться к запущенному браузеру из Вашего приложения всегда было проблематично. Обычно для это цели нужно писать "Browser Helper Object". Есть множество реализаций решения данной проблемы, но они либо слишком упрощены либо имеют массу ошибок. Приводимый ниже пример не имеет всех этих недостатков.

После некоторых исследований, я набрёл на интефейс, который позволяет следить за оболочками всех браузеров (как Windows Explorer так и Internet Explorer!).

Причём данный интерфейс не только хранит информацию о всех запущенных копий проводника, а ещё и посылает сообщение, когда новая копия браузера была запущена или удалена.

Если просматривать запущенные копии Проводника, то можно сделать запрос - поддерживается ли вход через интерфейс IWebBrowser. Если да, то это либо WebBrowser либо ShellBrowser. Если же используется интерфейс IWebBrowser2, то Вы можете производить манипуляции с (и коннектиться с) Проводником либо можно отслеживать события используя DWebBrowserEvents.

Для начала, необходимо в Ваш проект включить две строки:

#import "mshtml.tlb" // Internet Explorer 5
#import "shdocvw.dll"

Следующая функция показывает, как можно подключиться к запущенному Web браузеру

void CIEEnumWindowsDlg::ConnectToShell() 
{
 CoInitialize(NULL);

 if(m_spSHWinds == 0) 
 {
  //
  // Получаем указатель на интерфейс ShellWindows
  //
  if(m_spSHWinds.CreateInstance(__uuidof(SHDocVw::ShellWindows)) == S_OK) 
  {
   // Каркас события 
   //
   LPCONNECTIONPOINTCONTAINER pConnPtCont;

   if ((m_spSHWinds != NULL) &&
   SUCCEEDED(m_spSHWinds->QueryInterface(IID_IConnectionPointContainer,
   (LPVOID*)&pConnPtCont)))
   {
    ASSERT(pConnPtCont != NULL);
    LPCONNECTIONPOINT pConnPt = NULL;
    DWORD dwCookie = 0;

    if (SUCCEEDED(pConnPtCont->FindConnectionPoint(
     __uuidof(SHDocVw::DShellWindowsEvents), &pConnPt)))
    {
     ASSERT(pConnPt != NULL);
     pConnPt->Advise( this->GetIDispatch(FALSE), &dwCookie);
     pConnPt->Release();
    }

    pConnPtCont->Release();
   }
  }
  else 
  {
   AfxMessageBox("Shell Windows interface is not avilable");
  }
 }
}

Downloads

Скачать исходник - 15 Kb