1. 导入库 ,该指令一般加在 stdafx.h 中

   #import "msscript.ocx" no_namespace

 2. 创建脚本对象

 //脚本引擎

 IScriptControlPtr m_pScript;

 m_pScript.CreateInstance(__uuidof(ScriptControl));

 m_pScript->Timeout = 1000 * nTimeout; //超时设置

 m_pScript->PutAllowUI( VARIANT_FALSE );

 m_pScript->PutLanguage( _bstr_t(_T("JScript")) );

 

3. 读取脚本文件

  wstring js = read_file("c:/1.js");//read_file 函数此处略去

 

4. 增加代码并执行

   //增加代码

   m_pScript->AddCode( _bstr_t(js.c_str()));

   //执行代码(1.js 中有 main 函数)

   m_pScript->(_bstr_t(_T("main()")));

 

  至于脚本和VC的交互,可以通过创建 com 组件来实现,在 vc 工程中,增加一个 com 组件,比如 IVREngine,然后添加方法,在执行脚本前,把该对象增加到脚本引擎中,代码如下:

 //辅助对象

 CComPtr<IIVREngine>  pIVREngine;

 pIVREngine.CoCreateInstance(__uuidof(IVREngine));

 m_pScript->AddObject( _bstr_t("IVR"), pIVREngine, VARIANT_TRUE );

 

  这时,在脚本(1.js)中,就可以直接调用 IIVREngine 提供的方法了,比如 IVR.PlayFile("c:/1.wav");

 

 

 

注意

已有相应的类CScriptObject

 

BOOL CScriptDemoApp::InitInstance()

{

// Initialize COM

CoInitialize(NULL);

.......

}