在CPP中调用Jscript中的函数
站长推荐:NSetup一键部署软件
一键式完成美化安装包制作，自动增量升级，数据统计，数字签名。应对各种复杂场景，脚本模块化拆分，常规复杂的脚本代码，图形化设置。无需专业的研发经验，轻松完成项目部署。(www.nsetup.cn)
在CPP中调用Jscript中的函数
在C++中调用Jscript的函数非常简单，Windows提供了一个msscript.ocx的控件，利用这个控件可以直接操作Jscript: 执行一段Jscript脚本，或者调用指定的函数。我写了一个简单的例子：
l 导入msscript.ocx。下面这条指令会在项目目录中生成msscript.tli和msscript.tlh两个文件，里面有msscript.ocx中所有接口的描述和IID的定义。
| #import “msscript.ocx” no_namespace |
l 声明一个对象。
| CComPtr<IScriptControl> m_iScriptControl; |
l 创建对象实例
| if(SUCCEEDED(m_iScriptControl.CoCreateInstance(__uuidof(ScriptControl)))) |
l 设置语言等属性。
|
m_iScriptControl->PutLanguage(L”JScript”); m_iScriptControl->PutAllowUI(VARIANT_FALSE); |
l 加入Jscript代码。
|
m_iScriptControl->AddCode(L”function test(str1, str2) { return str1 + /”-ok-/” + str2; }”); |
l 获得函数，这里要说明的是GetItem的参数是1到n，而不是0到n-1。
|
CComPtr<IScriptProcedureCollection> aProcedureSet = m_iScriptControl->GetProcedures(); long n = aProcedureSet->GetCount();
CComPtr<IScriptProcedure> aProcedure = aProcedureSet->GetItem(_variant_t(n)); _bstr_t strFunction = aProcedure->GetName();
|
l 准备函数参数。
|
VARIANT va = {0}; va.vt = VT_BSTR;
n = 2; SAFEARRAYBOUND bounds[1] = {0}; bounds[0].cElements = n; SAFEARRAY* psa = SafeArrayCreate(VT_VARIANT, 1, bounds);
long i = 0; for(i = 0; i < n; i++) { va.bstrVal = SysAllocString(L”test”); SafeArrayPutElement(psa, &i, &va); } |
l 调用函数。
| _variant_t Result = m_iScriptControl->Run(strFunction, &psa); |
l 释放参数。
|
for(i = 0; i < n; i++) { va.bstrVal = SysAllocString(L”test”); SafeArrayGetElement(psa, &i, &va); SysFreeString(va.bstrVal); } SafeArrayDestroy(psa); |
王牌软件，兼职软件设计，软件修改，毕业设计。
本文出自 王牌软件，转载时请注明出处及相应链接。
本文永久链接: http://www.softwareace.cn/?p=892
