枚举BeforeNavigate2事件中的表单

Question

我正在写一个IE BHO，我想知道如何在事件回调中枚举表单。这是在BeforeNavigate2事件中枚举表单的代码，但长度始终为0。

STDMETHODIMP CEventSink::Invoke(DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS *pDispParams,VARIANT *pVarResult,EXCEPINFO *pExcepInfo,UINT *puArgErr)
{
    HRESULT hr;
    char bf[1024];
    if(!IsEqualIID(riid, IID_NULL)) 
        return DISP_E_UNKNOWNINTERFACE;
    if(dispIdMember == DISPID_BEFORENAVIGATE2) {
        IWebBrowser2* pSite = (IWebBrowser2*)pDispParams->rgvarg[6].pdispVal;
        IDispatch* pHtmlDocDispatch;
        hr = pSite->get_Document(&pHtmlDocDispatch);
        if (FAILED(hr) || !pHtmlDocDispatch) 
            return S_OK;
        IHTMLDocument2* pHtmlDoc = 0;
        hr = pHtmlDocDispatch->QueryInterface(IID_IHTMLDocument2, (void**)&pHtmlDoc);
        if(SUCCEEDED(hr) && pHtmlDoc) {
            CComPtr<IHTMLElementCollection> pColl=NULL;
            hr = pHtmlDoc->get_forms(&pColl);
            if (SUCCEEDED (hr) && (pColl != NULL))
            {
                long nLength = 0;
                hr = pColl->get_length (&nLength);
                if(SUCCEEDED(hr)) {
                    sprintf(bf, "len = %d", nLength);
                    OutputDebugString(bf); // always 0
                }
            }
        }
    }
    return S_OK;
}

为什么它总是输出0？

谢谢。

Answer 1

我刚刚将您的代码复制/粘贴到我的BHO中，得到了一个非零长度的集合。

尝试该URL：http://linuxfr.org/使用随机的用户/密码值并尝试连接。这将触发一个DISPID_BEFORENAVIGATE2，您将获得3个表单。

因此，您要导航的页面中似乎没有表单。

此外，您的代码会泄漏内存，并且在使用COM接口时不太正确（ag：您应该使用QueryInterface从IDispatch获得IWebBrowser2。

重写：

CComPtr<IDispatch> spIDispatch( pDispParams->rgvarg[6].pdispVal );
CComPtr<IWebBrowser2> spIWebBrowser2;
HRESULT hr = spIDispatch.QueryInterface<IWebBrowser2>( &spIWebBrowser2 );
if ( SUCCEEDED( hr ) && spIWebBrowser2 ) {
    CComPtr<IDispatch> spIDispatchDoc;
    hr = spIWebBrowser2->get_Document( &spIDispatchDoc );
    if ( SUCCEEDED( hr ) && spIDispatchDoc ) {
        CComPtr<IHTMLDocument2> spIHTMLDocument2;
        hr = spIDispatchDoc.QueryInterface<IHTMLDocument2>( &spIHTMLDocument2 );
        if ( SUCCEEDED( hr ) && spIHTMLDocument2 ) {
            CComPtr<IHTMLElementCollection> spIHTMLElementCollection;
            hr = spIHTMLDocument2->get_forms( &spIHTMLElementCollection );
            if ( SUCCEEDED( hr ) && spIHTMLElementCollection ) {
                 [...]
            }
        }
    }
}