이거, 간단치 않았던 작업이다. 열려있는 인터넷 익스플로어(이하 IE)를 제어해야 했다. 하다 보니, 이런걸 요청 받기도 하고 또, 겨우겨우 구현하기도 한다. 최단로(路)인지는 모르겠지만, 어쨌든 길은 길이다.
IE::_FindWindow(const TCHAR* tszSubWindowText)는 IE의 윈도우타이틀을 검색해서 핸들을 구한다. IE::Back()함수와 IE::Navigate()함수는 모두 윈도우 핸들을 찾기 위한 윈도우 타이틀을 인자로 요구하며, 각각, IE의 뒤로 가기와 URL이동을 구현한다.
이 코드는 oleacc.lib가 필요하며, Window XP에서 테스트 되었다.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 |
class IE { public: static void Back(const TCHAR* tszSubWindowText); static void Navigate(const TCHAR* tszSubWindowText, const TCHAR* tszDestUrl); private: IE() {} // Find Explorer_Server Window - subfunction of _Findwindow() static HWND _Find_Explorer_Server(HWND hParentWnd, HWND hChildWnd); // Find IE Window static HWND _FindWindow(const TCHAR* tszSubWindowText); static HWND _FindWindowWithSubWindowText(const TCHAR* tszSubWindowText); private: static HWND m_hWnd; };// class IE HWND IE::_Find_Explorer_Server(HWND hParentWnd, HWND hChildWnd) { if (hParentWnd == 0 || hChildWnd == 0) return 0; TCHAR tszClassName[1024] = {0, }; ::GetClassName(hChildWnd, tszClassName, 1024); if (tstring(tszClassName) == _T("Internet Explorer_Server")) return hChildWnd; HWND hRetWnd = _Find_Explorer_Server(hChildWnd, ::FindWindowEx(hChildWnd, 0, 0, 0)); if (hRetWnd != 0) return hRetWnd; return _Find_Explorer_Server(hParentWnd, ::FindWindowEx(hParentWnd, hChildWnd, 0, 0)); } HWND IE::_FindWindow(const TCHAR* tszSubWindowText) { HWND hWnd = _FindWindowWithSubWindowText(tszSubWindowText); return _Find_Explorer_Server(hWnd, ::FindWindowEx(hWnd, 0, 0, 0)); } HWND IE::_FindWindowWithSubWindowText(const TCHAR* tszSubWindowText) { HWND hWnd = 0; while (hWnd = ::FindWindowEx(0, hWnd, _T("IEFrame"), 0)) { TCHAR tszWindowText[1024] = {0, }; ::GetWindowText(hWnd, tszWindowText, 1024); size_t pos = tstring(tszWindowText).find(tszSubWindowText); if (pos != tstring::npos) return hWnd; } return 0; } void IE::Back(const TCHAR* tszSubWindowText) { m_hWnd = _FindWindowWithSubWindowText(tszSubWindowText); if (m_hWnd) { ::SetForegroundWindow(m_hWnd); m_hWnd = _FindWindow(tszSubWindowText); HRESULT hr; if (FAILED(hr = CoInitialize(NULL))) return; LRESULT lRes; UINT nMsg = ::RegisterWindowMessage(_T("WM_HTML_GETOBJECT")); ::SendMessageTimeout(m_hWnd, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes); CComPtr<IHTMLDocument2> spDoc; CComPtr<IHTMLWindow2> spWnd2; CComPtr<IServiceProvider> spServiceProv; hr = ::ObjectFromLresult(lRes, IID_IHTMLDocument2, 0, (void**)&spDoc); if (SUCCEEDED(hr)) { hr = spDoc->get_parentWindow((IHTMLWindow2**)&spWnd2); if (SUCCEEDED(hr)) { hr = spWnd2->QueryInterface(IID_IServiceProvider, (void**)&spServiceProv); if (SUCCEEDED(hr)) { IWebBrowser2* pWebBrowser2 = 0; hr = spServiceProv->QueryService(IID_IWebBrowserApp, IID_IWebBrowser2, (void**)&pWebBrowser2); hr = pWebBrowser2->GoBack(); pWebBrowser2->Release(); spServiceProv.Release(); } spWnd2.Release(); } spDoc.Release(); } CoUninitialize(); } } void IE::Navigate(const TCHAR* tszSubWindowText, const TCHAR* tszDestUrl) { m_hWnd = _FindWindowWithSubWindowText(tszSubWindowText); if (m_hWnd) { ::SetForegroundWindow(m_hWnd); m_hWnd = _FindWindow(tszSubWindowText); HRESULT hr; if (FAILED(hr = CoInitialize(NULL))) return; LRESULT lRes; UINT nMsg = ::RegisterWindowMessage(_T("WM_HTML_GETOBJECT")); ::SendMessageTimeout(m_hWnd, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes); CComPtr<IHTMLDocument2> spDoc; CComPtr<IHTMLWindow2> spWnd2; CComPtr<IServiceProvider> spServiceProv; hr = ::ObjectFromLresult(lRes, IID_IHTMLDocument2, 0, (void**)&spDoc); if (SUCCEEDED(hr)) { hr = spDoc->get_parentWindow((IHTMLWindow2**)&spWnd2); if (SUCCEEDED(hr)) { hr = spWnd2->QueryInterface(IID_IServiceProvider, (void**)&spServiceProv); if (SUCCEEDED(hr)) { IWebBrowser2* pWebBrowser2 = 0; hr = spServiceProv->QueryService(IID_IWebBrowserApp, IID_IWebBrowser2, (void**)&pWebBrowser2); CComVariant v; CComBSTR url(tszDestUrl); hr = pWebBrowser2->Navigate(url, &v, &v, &v, &v); pWebBrowser2->Release(); spServiceProv.Release(); } spWnd2.Release(); } spDoc.Release(); } CoUninitialize(); } } |
근데…, 이걸 어디에 쓰냐고?
쓸 데가 있더이다~
Thank You Very Much!!!