枚举BeforeNavigate2事件中的表单

enumerate forms in BeforeNavigate2 event

本文关键字:表单 事件 BeforeNavigate2 枚举      更新时间:2023-10-16

我正在写一个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?

谢谢。

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

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

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

此外,您的代码会泄漏内存,并且在使用COM接口时不太正确(ag:您应该使用QueryInterfaceIDispatch获得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 ) {
                 [...]
            }
        }
    }
}