[发明专利]基于脚本和COM组件控制的IVR流程编辑解析模型

权利要求书

1.基于脚本和COM组件控制的IVR流程编辑解析模型，其特征在于利用静态语言和动态语言相互操作、相互控制，以静态语言作为流程生成和解析的主体，动态语言进行辅助功能扩展，并借鉴工作流的思想，利用COM组件技术使动态语言反控制主体，进行功能更强大的辅助扩展以及更灵活的主体流程的动态改变；

具体步骤如下：

1>导入msscript.ocx，在项目目录中生成msscript.tli和msscript.tlh两个文件，里面有msscript.ocx中所有接口的描述和IID的定义；

#import″msscript.ocx″no_namespace

2>声明一个对象

CComPtr<IScriptControl>m_iScriptControl；

3>创建对象实例

if(SUCCEEDED(m_iScriptControl.CoCreateInstance(_uuidof(ScriptControl))))；

4>设置语言等属性

m_iScriptControl->PutLanguage(L″JScript″)；

m_iScriptControl->PutAllowUI(VARIANT_FALSE)；5.加入Jscript代码；

m_iScriptControl->AddCode(L″function test(str1，  str2)  {return str1  +str2；}″)；

5>获得函数，GetItem的参数是1-n

     CComPtr<IScriptProcedureCollection>ProcedureSet＝

m_iScriptControl->GetProcedures()；

    long n＝aProcedureSet->GetCount()；

    CComPtr<IScriptProcedure>aProcedure＝aProcedureSet->GetItem(_variant_t(n))；

    _bstr_t strFunction＝aProcedure->GetName()；

6>准备函数参数

 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)；

}

7>调用函数

_variant_t Result＝m_iScriptControl->Run(strFunction，&psa)；

8>释放参数

for(i＝0；i＜n；i++)

{

    va.bstrVal＝SysAllocString(L″test″)；

    SafeArrayGetElement(psa，&i，&va)；

    SysFreeString(va.bstrVal)；

}

SafeArrayDestroy(psa)；

2.根据权利要求1所述的解析模型，其特征在于，根据IVR流程编辑的特性，模型中包含IVR流程的动态编辑及动态解析，或借助静态语言C++、VB、Java实现IVR流程的动态编辑及动态解析。