ATL / WTL / STL

HRESULT __stdcall CTBar::OnDocumentComplete(IDispatch* pDisp, VARIANT* URL)<br />
{<br />
   IDispatch* dispdoc;<br />
   IWebBrowser2* wb;<br />
   pDisp->QueryInterface(IID_IWebBrowser2,(LPVOID*)&wb);<br />
   wb->get_Document(&dispdoc);<br />
   dispdoc->QueryInterface(IID_IHTMLDocument2,(LPVOID*)&hDoc);<br />
   hDoc->get_body(&hBody);<br />
   HRESULT hr=_IDispEventLocator<2, &__uuidof(HTMLElementEvents2)>::DispEventAdvise( hBody, &__uuidof(HTMLElementEvents2));<br />
   return S_OK;<br />
}

case DISPID_NEWWINDOW2:
				{
					CComPtr<IDispatch> pDisp = NULL;

					m_pBlankDlg = new CBlankDlg();
					m_pBlankDlg->Create( NULL );

					CComPtr<IUnknown> spUnk;
					m_pBlankDlg->GetDlgControl( IDC_BROWSER, IID_IWebBrowser2, (void **) &spUnk );
					CComQIPtr<IWebBrowser2> spWB = spUnk;
					
					spWB->get_Application( &pDisp );

					pDispParams->rgvarg[1].pdispVal = pDisp;
					m_pBlankDlg->ShowWindow( SW_SHOW );
				}

class CBlankDlg : 
	public CAxDialogImpl<CBlankDlg>,
	public IDispEventImpl<IDC_BROWSER,CBlankDlg>
{
...
BEGIN_SINK_MAP(CBlankDlg)
		SINK_ENTRY(IDC_BROWSER, 250, BeforeNavigate2Browser)
	END_SINK_MAP()
	void __stdcall BeforeNavigate2Browser(LPDISPATCH pDisp, VARIANT* URL, VARIANT* Flags, VARIANT* TargetFrameName, VARIANT* PostData, VARIANT* Headers, BOOL* Cancel);