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);
.......
}