internet-explorer - BHO VC++ を使用して Web ページに入力タグを挿入するには?

Question

以下のリンクを参照して、VC ++でBHOを作成しました

http://msdn.microsoft.com/en-us/library/bb250489%28v=vs.85%29.aspx

ページの読み込みが完了する間に入力タグを追加する必要があるので、以下のコードで試しました

void STDMETHODCALLTYPE CTestBHO::OnDocumentComplete(IDispatch *pDisp, VARIANT *pvarURL)
{

    if (SUCCEEDED(hr))
    {
    responseCode=200;
    setResponseCode(pDisp);
    }
}

void CRealBrowserBHO::setResponseCode(IDispatch *pDisp)
{
HRESULT hr = S_OK;
CComPtr<IDispatch> spDispDoc;
hr = m_spWebBrowser->get_Document(&spDispDoc);
if (SUCCEEDED(hr))
    {
        BSTR inputElement=L"<input type=\"text\" name=\"ResponseCode\" value=\"200\">";
        IHTMLElement *pTRElmt = NULL;
        CComQIPtr<IHTMLDocument2> spHTMLDoc = spDispDoc;
        HRESULT hr1=spHTMLDoc->get_body(&pTRElmt);
        if (spHTMLDoc != NULL)
        {
            HRESULT hr=pTRElmt->insertAdjacentHTML(L"beforeEnd",inputElement);
        }
    }
}

しかし、タグが私の Web ページに挿入されませんでした。

何がうまくいかないのか、私がここで見逃したものを教えてください

ありがとう、ラマチャンドラン。