科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件在CPP中调用Jscript中的函数

在CPP中调用Jscript中的函数

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

在C++中调用Jscript的函数非常简单,Windows提供了一个msscript.ocx的控件,利用这个控件可以直接操作Jscript: 执行一段Jscript脚本,或者调用指定的函数。

作者:李先静 来源:CSDN 2008年3月20日

关键字: 函数 调用 C++ C Linux

  • 评论
  • 分享微博
  • 分享邮件

C++中调用Jscript的函数非常简单,Windows提供了一个msscript.ocx的控件,利用这个控件可以直接操作Jscript: 执行一段Jscript脚本,或者调用指定的函数。我写了一个简单的例子:

 

l         导入msscript.ocx。下面这条指令会在项目目录中生成msscript.tlimsscript.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的参数是1n,而不是0n-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);

 

 

    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章