BHO中处理IE的事件

    IEHelperSetSite方法的实现过程中,IEHelper通知IE浏览器他想要收到所有IE触发的事件。为了能够从IE中收到事件,你必须实现IDispatch接口。

    在默认的情况下,简单的ATL对象从IDispatchImpl中继承,当IE触发了事件的时候, 你可以使用AtlAdvise来让IE通知你。仅有的一个你需要重写的IDispatchImpl方法是Invoke方法。每次IE激发了一个事件的时候,他都会调用你的Invoke方法。

    为了停止收到事件,你可以雕用AtlUnadvise方法。当IE通知你,他正在退出的时候,你必须调用AtlUnadvise传递DISPID_QUIT参数到Invoke方法。下面的代码重写了Invoke方法。就象我们看到的那样,下面的大部分代码是为了处理IE的事件并且将这些事件的名字写到IEHelper事件的窗口中。

STDMETHODIMP CIEHlprObj::Invoke(DISPID dispidMember, REFIID riid,
                                LCID lcid, WORD wFlags,
                                DISPPARAMS
* pDispParams,
                                VARIANT
* pvarResult,
                                EXCEPINFO
*  pExcepInfo, UINT* puArgErr)
{
   USES_CONVERSION;
   strstream strEventInfo;
 
   
if (!pDispParams)
      
return E_INVALIDARG;
 
   
//
   
// Get the current URL.
   
//  
   LPOLESTR lpURL = NULL;
   m_spWebBrowser2
->get_LocationURL(&lpURL);
 
   
switch (dispidMember)
   
{
      
//
      
// The parameters for this DISPID are as follows:
      
// [0]: Cancel flag  - VT_BYREF|VT_BOOL
      
// [1]: HTTP headers - VT_BYREF|VT_VARIANT
      
// [2]: Address of HTTP POST data  - VT_BYREF|VT_VARIANT 
      
// [3]: Target frame name - VT_BYREF|VT_VARIANT 
      
// [4]: Option flags - VT_BYREF|VT_VARIANT
      
// [5]: URL to navigate to - VT_BYREF|VT_VARIANT
      
// [6]: An object that evaluates to the top-level or frame
      
//      WebBrowser object corresponding to the event 
      
//
      case DISPID_BEFORENAVIGATE2:
         strEventInfo 
<< "BeforeNavigate2: ";
 
         
if (pDispParams->cArgs >= 5 &&
             pDispParams
->rgvarg[5].vt == (VT_BYREF|VT_VARIANT))
         
{
            CComVariant varURL(
*pDispParams->rgvarg[5].pvarVal);
            varURL.ChangeType(VT_BSTR);
 
            strEventInfo 
<< OLE2T(varURL.bstrVal);
         }

         
else
            strEventInfo 
<< "NULL";
 
         strEventInfo 
<< ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: URL navigated to - VT_BYREF|VT_VARIANT
      
// [1]: An object that evaluates to the top-level or frame
      
//      WebBrowser object corresponding to the event 
      
//
      case DISPID_NAVIGATECOMPLETE2:
         
if (pDispParams->rgvarg[0].vt == (VT_BYREF|VT_VARIANT))
         
{
            CComVariant varURL(
*pDispParams->rgvarg[0].pvarVal);
            varURL.ChangeType(VT_BSTR);
  
            strEventInfo 
<< "NavigateComplete2: "
                         
<< OLE2T(varURL.bstrVal)
                         
<< ends;
         }

         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: New status bar text - VT_BSTR
      
//
      case DISPID_STATUSTEXTCHANGE:
         LPOLESTR lpStatusText;
 
         m_spWebBrowser2
->get_StatusText(&lpStatusText);
         strEventInfo 
<< "StatusTextChange: ";
 
         
if (!strcmp(OLE2T(lpStatusText), ""))
            strEventInfo 
<< "NULL";
         
else
            strEventInfo 
<< OLE2T(lpStatusText);
 
         strEventInfo 
<< ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: Maximum progress - VT_I4
      
// [1]: Amount of total progress - VT_I4
      
//
      case DISPID_PROGRESSCHANGE:
         strEventInfo 
<< "ProgressChange: ";
 
         
if (pDispParams->cArgs == 0)
            strEventInfo 
<< "NULL";
         
else
         
{
            
if (pDispParams->rgvarg[0].vt == VT_I4)
               strEventInfo 
<< pDispParams->rgvarg[0].lVal;
 
            
if (pDispParams->cArgs > 1 &&
                pDispParams
->rgvarg[1].vt == VT_I4)
            
{
               strEventInfo 
<< "" << pDispParams->rgvarg[1].lVal;
            }

         }

 
         strEventInfo 
<< ends;
         
break;
 
      
case DISPID_DOCUMENTCOMPLETE:
         strEventInfo 
<< "DocumentComplete" << ends;
         
break;
 
      
case DISPID_DOWNLOADBEGIN:
         strEventInfo 
<< "DownloadBegin" << ends;
         
break;
 
      
case DISPID_DOWNLOADCOMPLETE:
         strEventInfo 
<< "DownloadComplete" << ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: Enabled state - VT_BOOL
      
// [1]: Command identifier - VT_I4
      
//
      case DISPID_COMMANDSTATECHANGE:
         strEventInfo 
<< "CommandStateChange: ";
 
         
if (pDispParams->cArgs == 0)
            strEventInfo 
<< "NULL";
         
else
         
{
            
if (pDispParams->rgvarg[0].vt == VT_BOOL)
            
{
               strEventInfo 
<< ((pDispParams->rgvarg[0].boolVal == 
                                 VARIANT_TRUE) 
? "True" : "False");
            }

 
            
if (pDispParams->cArgs > 1 &&
                pDispParams
->rgvarg[1].vt == VT_I4)
            
{
               strEventInfo 
<< "" << pDispParams->rgvarg[1].lVal;
            }

         }

 
         strEventInfo 
<< ends;
         
break;
 
      
case DISPID_NEWWINDOW2:
         strEventInfo 
<< "NewWindow2" << ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: Document title - VT_BSTR
      
//
      case DISPID_TITLECHANGE:
         strEventInfo 
<< "TitleChange: ";
 
         
if (pDispParams->cArgs > 0 &&
             pDispParams
->rgvarg[0].vt == VT_BSTR)
         
{
            strEventInfo 
<< OLE2T(pDispParams->rgvarg[0].bstrVal);
         }

         
else
         
{
            strEventInfo 
<< "NULL";
         }

 
         strEventInfo 
<< ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: Name of property that changed - VT_BSTR
      
//
      case DISPID_PROPERTYCHANGE:
         strEventInfo 
<< "PropertyChange: ";
 
         
if (pDispParams->cArgs > 0 &&
             pDispParams
->rgvarg[0].vt == VT_BSTR)
         
{
            strEventInfo 
<< OLE2T(pDispParams->rgvarg[0].bstrVal);
         }

         
else
         
{
            strEventInfo 
<< "NULL";
         }

 
         strEventInfo 
<< ends;
         
break;
 
      
//
      
// The parameters for this DISPID:
      
// [0]: Address of cancel flag - VT_BYREF|VT_BOOL
      
//
      case DISPID_QUIT:
         strEventInfo 
<< "Quit" << ends;
 
         ManageConnection(Unadvise);
         m_dlgEvents.DestroyWindow();
         
break;
 
      
default:
         strEventInfo 
<< "Unknown Event" << dispidMember << ends;
         
break;
   }

 
   m_dlgEvents.AddEventToList(strEventInfo.str());
 
   
return S_OK;
}
posted on 2008-06-02 14:01  飞天名猪  阅读(2133)  评论(0编辑  收藏  举报