Как автоматизировать IE webapp, который появляется модальный диалог HTML?
[ Пересмотрено еще раз для ясности]
У меня есть программа на С++, которая взаимодействует с веб-сайтом. Сайт является специфичным для IE, и моя программа тоже.
Я подключаюсь к исполняемому экземпляру IE обычным способом (вне процесса - см. код). Как только я получу IWebBrowser2
, я не имею проблемы с получением IHTMLDocument2
и взаимодействием с отдельными объектами IHTMLElement
, заполнением полей и нажатиями кнопок.
Но если на веб-странице есть javascript, который вызывает window.showModalDialog, я застрял: мне нужно взаимодействовать с элементами HTML в всплывающее окно, как и другие страницы; но я не могу получить его IWebBrowser2
.
Всплывающее меню всегда называется "Диалог веб-страниц" и представляет собой окно типа Internet Explorer_TridentDlgFrame
, содержащее Internet Explorer_Server
. Но я не могу получить IWebBrowser2 из окна Internet Explorer_Server
, как я могу, когда это обычный экземпляр IE.
Я могу получить IHTMLDocument2Ptr
, но когда я пытаюсь получить IWebBrowser2
, я получаю HRESULT
от E_NOINTERFACE
.
Код довольно стандартный материал и отлично работает, если это "нормальное" окно IE
IHTMLDocument2Ptr pDoc;
LRESULT lRes;
/* hWndChild is an instance of class "Internet Explorer_Server" */
UINT nMsg = ::RegisterWindowMessage( "WM_HTML_GETOBJECT" );
::SendMessageTimeout( hWndChild, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000,
(DWORD*)&lRes );
LPFNOBJECTFROMLRESULT pfObjectFromLresult =
(LPFNOBJECTFROMLRESULT)::GetProcAddress( hInst, "ObjectFromLresult" );
if ( pfObjectFromLresult != NULL )
{
HRESULT hr;
hr = (*pfObjectFromLresult)( lRes, IID_IHTMLDocument, 0, (void**)&pDoc );
if ( SUCCEEDED(hr) ) {
IServiceProvider *pService;
hr = pDoc->QueryInterface(IID_IServiceProvider, (void **) &pService);
if ( SUCCEEDED(hr) )
{
hr = pService->QueryService(SID_SWebBrowserApp,
IID_IWebBrowser2, (void **) &pBrowser);
// This is where the problem occurs:
// hr == E_NOINTERFACE
}
}
}
В случае, если это важно, это Vistastrong > и IE8. (Я подчеркиваю это, потому что оба из них вносили изменения в мою кодовую базу, которая отлично работала с XP/IE7.)
И снова моя цель - получить каждый IHTMLElement
и взаимодействовать с ним. У меня нет доступа к исходному коду приложения, которое я автоматизирую.
Я рассматриваю возможность отправки нажатий клавиш в окно Internet Explorer_Server
, но скорее не будет.
Отредактировано для добавления:
Кто-то предложил получить дочерние окна и отправить их сообщениям, но я уверен, что не работает с Internet Explorer_Server
; согласно Spy ++, нет никаких дочерних окон. (Это не зависит от IE. Аплеты Java, похоже, не имеют дочерних окон.)
Обновление
В комментариях Саймон Маурер сказал, что приведенный выше код работал для него, и чтобы убедиться, что нет опечаток, он очень щедро разместил полное автономное приложение на pastebin. Когда я использовал его код, он потерпел неудачу точно так же в одном и том же месте, и я понял, что он думал, что я хочу подключиться к базовой странице, а не всплывающей. Поэтому я отредактировал текст выше, чтобы удалить эту двусмысленность.
Ответы
Ответ 1
Я не знаю, почему вы хотите получить IServiceProvider
или IWebBrowser2
, если хотите просто IHTMLElement
. Вы можете получить их, вызвав метод IHTMLDocument
get_all()
.
Этот фрагмент кода показывает вам, как это работает:
#include <Windows.h>
#include <mshtml.h>
#include <Exdisp.h>
#include <atlbase.h>
#include <SHLGUID.h>
#include <oleacc.h>
#include <comdef.h>
#include <tchar.h>
HRESULT EnumElements(HINSTANCE hOleAccInst, HWND child)
{
HRESULT hr;
UINT nMsg = ::RegisterWindowMessage(_T("WM_HTML_GETOBJECT"));
LRESULT lRes = 0;
::SendMessageTimeout(child, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (PDWORD)&lRes);
LPFNOBJECTFROMLRESULT pfObjectFromLresult = (LPFNOBJECTFROMLRESULT)::GetProcAddress(hOleAccInst, "ObjectFromLresult");
if (pfObjectFromLresult == NULL)
return S_FALSE;
CComPtr<IHTMLDocument2> spDoc;
hr = (*pfObjectFromLresult)(lRes, IID_IHTMLDocument2, 0, (void**)&spDoc);
if (FAILED(hr)) return hr;
CComPtr<IHTMLElementCollection> spElementCollection;
hr = spDoc->get_all(&spElementCollection);
if (FAILED(hr)) return hr;
CComBSTR url;
spDoc->get_URL(&url);
printf("URL: %ws\n", url);
long lElementCount;
hr = spElementCollection->get_length(&lElementCount);
if (FAILED(hr)) return hr;
printf("Number of elements: %d", lElementCount);
VARIANT vIndex; vIndex.vt = VT_I4;
VARIANT vSubIndex; vSubIndex.vt = VT_I4; vSubIndex.lVal = 0;
for (vIndex.lVal = 0; vIndex.lVal < lElementCount; vIndex.lVal++)
{
CComPtr<IDispatch> spDispatchElement;
if (FAILED(spElementCollection->item(vIndex, vSubIndex, &spDispatchElement)))
continue;
CComPtr<IHTMLElement> spElement;
if (FAILED(spDispatchElement->QueryInterface(IID_IHTMLElement, (void**)&spElement)))
continue;
CComBSTR tagName;
if (SUCCEEDED(spElement->get_tagName(&tagName)))
{
printf("%ws\n", tagName);
}
}
return S_OK;
}
int _tmain(int argc, _TCHAR* argv[])
{
::CoInitialize(NULL);
HINSTANCE hInst = ::LoadLibrary(_T("OLEACC.DLL"));
if (hInst != NULL)
{
HRESULT hr = EnumElements(hInst, (HWND)0x000F05E4); // Handle to Internet Explorer_Server determined with Spy++ :)
::FreeLibrary(hInst);
}
::CoUninitialize();
return 0;
}
Над кодом работает как с обычным окном, так и с модальным окном, просто передайте правильную HWND
функции SendMessageTimeout
.
ПРЕДУПРЕЖДЕНИЕ Я использую жестко закодированное значение HWND
в этом примере, если вы хотите его протестировать, вы должны запустить экземпляр IE и получить HWND
окна Internet Explorer_Server
, используя Spy ++.
Я также советую вам использовать CComPtr
, чтобы избежать утечек памяти.