CeF3开发者系列之外篇——IE中JS与C++交互

IDispatch:public IUnkown
{
    //...
    HRESULT Invoke( DISPID dispIdMember,REFIID riid, LCID lcid,WORD wFlags,DISPPARAMS FAR* pDispParams,VARIANT FAR* pVarResult, EXCEPINFO FAR* pExcepInfo, unsigned int FAR* puArgErr );  
    //...
}

CComPtr<IDispatch> GetScript()
{

	CComPtr<IWebBrowser2> spWebBrowser;

	HRESULT hResult = QueryControl(IID_IWebBrowser2, (void**)&spWebBrowser);

	if (SUCCEEDED(hResult))

	{

		CComPtr<IDispatch> spDocDisp;
		hResult = spWebBrowser->get_Document(&spDocDisp);
		if (SUCCEEDED(hResult))
		{

			CComPtr<IHTMLDocument2> spDocDisp2;
			hResult = spDocDisp->QueryInterface(IID_IHTMLDocument2, (void**)&spDocDisp2);
			if (SUCCEEDED(hResult))
			{
				CComPtr<IDispatch> spScript;
				hResult = spDocDisp2->get_Script(&spScript);
				if (SUCCEEDED(hResult))
				{
				return spScript;
				}
			}
		}
	}
}

wstring strJavaScript;

CComVariant pvarRet;

CComBSTR bstrJavaScript(strJavaScript.c_str());

CComBSTR bstrScriptType(_T("javascript"));

CComQIPtr<IHTMLWindow2> spWindow2(spScriptDisp);

spWindow2->execScript(bstrJavaScript, bstrScriptType, &pvarRet);

CComPtr<IHTMLDocument2> spDocDisp2;
spDocDisp2->get_Script(&spScript);
OLECHAR *  Names= L"function" ;
DISPID dispID=0;

//先获取接受调度标示符DISPID，需要调用GetIDsOfNames来获取
spScript->GetIDsOfNames(IID_NULL,&Names,1,LOCALE_SYSTEM_DEFAULT, &dispID);

//通过Invoke（援引）方法调用JS方法
spScript->Invoke(dispID,,IID_NULL ,LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD,NULL,NULL,NULL,NULL);

<script type="text/javascript">  

    function Add(value1, value2) {  

        return value1 + value2;  

    }  

</script>  

//别忘了#include <MsHTML.h>  

//m_WebBrowser是一个WebBrowser的Activex控件对象。  
CComQIPtr<IHTMLDocument2> spDoc = m_WebBrowser.get_Document();  
CComDispatchDriver spScript;  
spDoc->get_Script(&spScript);  
  
CComVariant var1 = 10, var2 = 20, varRet;  

spScript.Invoke2(L"Add", &var1, &var2, &varRet);  

<script type="text/javascript">  

    function Add(value1, value2) {  

        var array = new Array();  

        array[0] = value1;  

        array[1] = value2;  

        array[2] = value1 + value2;  

        return array;  
    }  

</script> 

CComQIPtr<IHTMLDocument2> spDoc = m_WebBrowser.get_Document();  
CComDispatchDriver spScript;  

spDoc->get_Script(&spScript);  
CComVariant var1 = 10, var2 = 20, varRet;  
spScript.Invoke2(L"Add", &var1, &var2, &varRet);  
      
CComDispatchDriver spArray = varRet.pdispVal;  

//获取数组中元素个数，这个length在JS中是Array对象的属性
CComVariant varArrayLen;  

spArray.GetPropertyByName(L"length", &varArrayLen);  
//获取数组中第0,1,2个元素的值：  

CComVariant varValue[3];  

spArray.GetPropertyByName(L"0", &varValue[0]);  
spArray.GetPropertyByName(L"1", &varValue[1]);  
spArray.GetPropertyByName(L"2", &varValue[2]);  

<script type="text/javascript">  

    function Add(value1, value2) {  

        var data = new Object();  

        data.result = value1 + value2;  

        data.str = "Hello,World!";  

        return data;  

    }  

</script>  

    CComQIPtr<IHTMLDocument2> spDoc = m_WebBrowser.get_Document();  
    CComDispatchDriver spScript;  

    spDoc->get_Script(&spScript);  
    CComVariant var1 = 10, var2 = 20, varRet;  
    spScript.Invoke2(L"Add", &var1, &var2, &varRet);  
    CComDispatchDriver spData = varRet.pdispVal;  

    CComVariant varValue1, varValue2;  

    spData.GetPropertyByName(L"result", &varValue1);  
    spData.GetPropertyByName(L"str", &varValue2);  

class CWebBrowser : public CAxHostWindow

{

	private:

	CComPtr<IWebBrowser2> m_pWebBrowser; //保存创建出来的浏览器控件实例

	BEGIN_MSG_MAP(CWebBrowser)

	MESSAGE_HANDLER(WM_CREATE,OnCreate)

	CHAIN_MSG_MAP(CAxHostWindow)

	END_MSG_MAP()

 
	LRESULT OnCreate(UINT uMsg, WPARAM wParam, LPARAM lParam, BOOL& /*bHandled*/)
	{
		// Create WebBrowser object
		LPOLESTR pName=NULL;

		StringFromCLSID(CLSID_WebBrowser,&pName);

		CComPtr<IDispatch>disp;
		CComPtr<IUnknown> p;

		_InternalQueryInterface(IID_IDispatch,(void**)&disp);

		// 创建 WebBrowser
		CreateControlEx(pName,m_hWnd,NULL,&p,DIID_DWebBrowserEvents2,disp);  
		CoTaskMemFree(pName);

		// 查询IWebBrowser2 接口，用于控制
		HRESULT hRet = QueryControl(IID_IWebBrowser2, (void**)&this->m_pWebBrowser); 

		return m_pWebBrowser?S_OK:-1;

	}
}

STDMETHODIMP CWebBrowserDisp::Invoke(DISPID dispIdMember,  REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS* pDispParams, VARIANT* pVarResult, EXCEPINFO* pExcepInfo, unsigned int* puArgErr)
{
    HRESULT nRet = S_OK;

    if(wFlags&DISPATCH_METHOD) //属于方法调用
    {
		//给newMyObject分配的id,字符串名字映射

		if(dispIdmember== DISPID_newMyObject)

		{
			IDispatch* pMyObject=NULL;

			//创建c++对象并获取其IDispatch接口

			CreateMyObject(&pMyObject);

			pVarResult->vt=VT_DISPATCH;

			pVarResult->pdispVal=pMyObject;   //作为返回值传递给js
		}
    }
    return 0;
}

#include "StdAfx.h"
#include "SQSuperCall.h"

CJSCallC::CJSCallC(void)
{
	 m_mapFunction[TEXT("FuncTest")] = DISPID_FuncTest;
}

CJSCallC::~CJSCallC(void)
{
}

HRESULT STDMETHODCALLTYPE CJSCallC::GetIDsOfNames( 
	/* [in] */ __RPC__in REFIID riid,
	/* [size_is][in] */ __RPC__in_ecount_full(cNames) LPOLESTR *rgszNames,
	/* [range][in] */ UINT cNames,
	/* [in] */ LCID lcid,
	/* [size_is][out] */ __RPC__out_ecount_full(cNames) DISPID *rgDispId)
{
	HRESULT hr = NOERROR;
	for (UINT nIndex = 0; nIndex < cNames; ++nIndex)
	{
		wstring strFuntion = rgszNames[nIndex];
		map<wstring, int>::iterator iter = m_mapFunction.find(strFuntion);
		if (m_mapFunction.end() != iter)
		{
			rgDispId[nIndex] = iter->second;
		}
		else
		{
			hr = ResultFromScode(DISP_E_UNKNOWNNAME);
			rgDispId[nIndex] = DISPID_UNKNOWN;
		}
	}

	return hr;
}

/* [local] */ HRESULT STDMETHODCALLTYPE CJSCallC::Invoke( 
	/* [in] */ DISPID dispIdMember,
	/* [in] */ REFIID riid,
	/* [in] */ LCID lcid,
	/* [in] */ WORD wFlags,
	/* [out][in] */ DISPPARAMS *pDispParams,
	/* [out] */ VARIANT *pVarResult,
	/* [out] */ EXCEPINFO *pExcepInfo,
	/* [out] */ UINT *puArgErr)
{
	if (dispIdMember == DISPID_FuncTest)
	{
        int paramsCount = pDispParams->cArgs;
		if (paramsCount < 2)
            return S_FALSE;

		VARIANTARG* cmdVar = (VARIANTARG*)(&pDispParams->rgvarg[paramsCount - 1]);
	    if (!(cmdVar->vt == VT_I4  || cmdVar->vt == VT_BSTR))
			return S_FALSE;
        int nCmdId = cmdVar->intVal;

        cmdVar = (VARIANTARG*)(&pDispParams->rgvarg[paramsCount - 2]);
        if( cmdVar->vt != VT_BSTR )
            return S_FALSE;
        CString csInfos = cmdVar->bstrVal;
        wstring strInfos(csInfos);

	}
	return S_OK;
}

HRESULT STDMETHODCALLTYPE CJSCallC::QueryInterface( 
	/* [in] */ REFIID riid,
	/* [iid_is][out] */ 
	__RPC__deref_out  void **ppvObject)
{
	//*ppvObject = NULL;
	if (riid == IID_IUnknown)
	{
		*ppvObject = static_cast<IUnknown*>(this);
	}
	else if (riid == IID_IDispatch)
	{
		*ppvObject = static_cast<IDispatch*>(this);
	}
	else
	{
		return E_NOINTERFACE;
	}
	return S_OK;
}