WebBrowser中調用載入頁面的Javascript方法

using AxSHDocVw;
using Microsoft.VisualBasic;
using mshtml;

AxWebBrowser awb = (AxWebBrowser)page.Controls[0];
SHDocVw.IWebBrowser2 iwb = (SHDocVw.IWebBrowser2)awb.Application;
object app = awb.Application;
string name = Information.TypeName(app);

HTMLDocumentClass doc = (HTMLDocumentClass)awb.Document;
if (doc != null)
{
    HTMLBodyClass body = (HTMLBodyClass)doc.getElementsByTagName("body").item(null, 0);
    HTMLScriptElementClass script = (HTMLScriptElementClass)doc.createElement("script");
    script.setAttribute("type", "text/javascript", 0);
    script.text = "closeControl();";
    body.appendChild((IHTMLDOMNode)script);
    doc.close();
}
awb.Dispose();
awb = null;

tab.TabPages.Remove(page);

page.Dispose();
GC.Collect();

#import "C:\WINDOWS\system32\mshtml.tlb"

/* 動態修改網頁中的內容
IHTMLDocument2* pHTMLFocument2;
LPDISPATCH lpDispatch;
lpDispatch = m_wb.get_Document();
if(lpDispatch)
{
    HRESULT hr;
    hr = lpDispatch->QueryInterface(IID_IHTMLDocument2, (LPVOID*)&pHTMLFocument2);
    lpDispatch->Release();
    IHTMLElement* pBody;
    hr = pHTMLFocument2->get_body(&pBody);
    UpdateData(TRUE);
    BSTR bstr = L"hxh";
    // pBody->get_innerHTML(bstr);
    pBody->put_innerHTML(bstr);  
    SysFreeString(bstr);
    pBody->Release();
} */

// 動態執行網頁中的方法
MSHTML::IHTMLDocument2Ptr spDoc(m_wb.get_Document());
if (spDoc)
{
    IDispatchPtr spDisp(spDoc->GetScript());
    if (spDisp)
    {
        OLECHAR FAR* szMember = L"closeControl";
        DISPID dispid;
        HRESULT hr = spDisp->GetIDsOfNames(IID_NULL, &szMember, 1, LOCALE_SYSTEM_DEFAULT, &dispid);
        if (SUCCEEDED(hr))
        {
            COleVariant vtResult;
            static BYTE parms[] = VTS_BSTR;
            COleDispatchDriver dispDriver(spDisp, FALSE);
            dispDriver.InvokeHelper(dispid, DISPATCH_METHOD, VT_VARIANT, (void*)&vtResult, parms, "");
        }
    }
}