COM组件中调用JavaScript函数详解及实例

COM组件中调用JavaScript函数详解及实例

要求是很简单的，即有COM组件A在IE中运行，使用JavaScript（JS）调用A的方法longCalc()，该方法是一个耗时的操作，要求通知IE当前的进度。这就要求使用回调函数，设其名称为scriptCallbackFunc。实现这个技术很简单：

1 、组件方（C++）

组件A 的方法在IDL中定义：

[id(2)] HRESULT longCalc([in] DOUBLE v1, [in] DOUBLE v2, [in, optional] VARIANT scriptCallback); 

组件A的方法实现：

// 假设回调原型为： 
// scriptCallbackFunc(LONG nCurrentProgress, LONG nTotalProgress, BSTR bstrProgressName); 
// 此方法由JS脚本来实现 
STDMETHODIMP CA:: longCalc (DOUBLE v1, DOUBLE v2, VARIANT scriptCallback) 
{ 
 CComPtr<IDispatch> spCallback; 
 if (scriptCallback.vt == VT_DISPATCH) 
 spCallback = scriptCallback.pdispVal; 
 
 
 // 参数准备 
 CComVariant varResult; 
 CComVariant avarParams[3]; 
 avarParams[0] = “开始计算股票”; // bstrProgressName 
 avarParams[0].vt = VT_BSTR; 
 avarParams[1] = 100; // nTotalProgress 
 avarParams[1].vt = VT_I4; 
 avarParams[2] = 0; // nCurrentProgress 
 avarParams[2].vt = VT_I4; 
 DISPPARAMS params = { avarParams, NULL, 3, 0 }; 
 
 
 if(spCallback) 
 spCallback->Invoke(0, 
 IID_NULL, 
 LOCALE_USER_DEFAULT, 
 DISPATCH_METHOD, 
 ¶ms, &varResult, NULL, NULL); 
 
 BOOL bFinished = false; 
 
 
 while(!bFinished) 
 { 
 // 计算工作… 
 Sleep(1000); 
 v1 = v1+v2; 
 
 // 回调客户 
 if(spCallback) 
 { 
 avarParams[0] = “正在计算股票…”; 
 avarParams[2] = 0; 
 spCallback->Invoke(0, 
 IID_NULL, 
 LOCALE_USER_DEFAULT, 
 DISPATCH_METHOD, 
 ¶ms, &varResult, NULL, NULL); 
 } 
 
 if(…) 
 bFinished = TRUE; 
 } // while OK! 
 
 return S_OK; 
} 

2、 客户方（JS）

<script language="javascript"> 
<!-- 
 // 符合回调原型：scriptCallbackFunc 
 function scfDisplayProgress(nCurrentProgress, nTotalProgress, bstrProgressName) 
 { 
 window.status = bstrProgressName + “:”+(nCurrentProgress *100/TotalProgress); 
 } 
 
 // 创建组件并执行longCalc 
 var objA = new ActiveXObject(“MyCom.A”); 
 
 // 使用回调: 执行时在IE状态栏显示进度 
 objA. longCalc (100, 200, scfDisplayProgress); 
 
 // 不使用回调 
 objA. longCalc (100, 200); 
//--> 
</script> 

3 说明

• 该技术仅适用于脚本。不适合于VB、C++客户。
• 该技术和连接点、事件无关。
• 微软的XML DOM对象广泛使用这个方法。

 感谢阅读，希望能帮助到大家，谢谢大家对本站的支持！