我们经常会遇到,将脚本中定义的多个参数打包到一个数组中,然后将这个数组传给一个组件方法。javascript和vbscript定义数组的方式是不同的。vbscript中的数组采用的是自动化兼容类型SAFEARRAY,对它进行遍历是很方便的。下面我们重点看看javascript中的数组如何进行遍历。
一、javascript脚本中数组的定义
javascript中的数组更像是一个Object对象。在javascript中,可以按数值索引给一个数组元素赋值,也可以通过名称索引给数组元素赋值,如下:
var oParams=new Object();
oParams["LoginName"]="test";
oParams["Password"]="123";
oParams["VerifyCode"]="12PQ";
这样赋值的好处是,每一个元素都可以标识一个明确的意义。
将oParams传入组件方法oSoapClient.Execute
oSoapClient.Execute("UserLogin",oParams,fn_login_result,null);二、动态脚本的秘密武器--IDispatchEx接口
对于一个基本的Object对象,即可以动态的增加或删除属性、方法,也可以生成一个自定义的类,完全基于一个IDispatchEx接口。IDispatchEx是IDispatch的扩展,为实现动态脚本的一些动态特性量身定制。除了提供IDispatch接口的所有方法之外,IDispatchEx还额外提供以下几个特性:
- Add new members to an object ("expando") — use GetDispID with the fdexNameEnsure flag.
- Delete members of an object — use DeleteMemberByName or DeleteMemberByDispID.
- Case-sensitive dispatch operations — use fdexNameCaseSensitive or fdexNameCaseInsensitive.
- Search for member with implicit name — use fdexNameImplicit.
- Enumerate DISPIDs of an object — use GetNextDispID.
- Map from DISPID to element name — use GetMemberName.
- Obtain properties of object members — use GetMemberProperties.
- Method invocation with this pointer — use InvokeEx with DISPATCH_METHOD.
- Allow browsers that support the concept of name spaces to obtain the name space parent of an object — use GetNameSpaceParent.
下面,我们就通过GetNextDispID、GetMemberName和InvokeEx三个方法实现对数组的遍历。
三、遍历
VARIANT varParams; //这是脚本传入的参数数组
//如果传入的类型不是VT_DISPATCH就退回出错信息
if(varParams.vt!=VT_DISPATCH)
return E_INVALIDARG;
//取得IDispatchEx接口
CComPtr<IDispatchEx> pDispEx;
HRESULT hr=varParams.pdispVal->QueryInterface(IID_IDispatchEx,(void**)&pDispEx);
if(FAILED(hr))
return E_INVALIDARG;
//枚举所有的属性
DISPID dispid;
//取得第一个元素的DISPID
hr = pDispEx->GetNextDispID(fdexEnumAll, DISPID_STARTENUM, &dispid);
while (hr == NOERROR)
{
//元素名称
CComBSTR bstrName;
hr = pDispEx->GetMemberName(dispid, &bstrName);
if (FAILED(hr))
return E_FAIL;
//元素值
CComVariant vValue;
DISPPARAMS dispparamsNoArgs = {NULL, NULL, 0, 0};
hr = pDispEx->InvokeEx(dispid, LOCALE_USER_DEFAULT,
DISPATCH_PROPERTYGET, &dispparamsNoArgs,
&vValue, NULL, NULL);
if(FAILED(hr))
return E_FAIL;
//取得下一个元素的DISPID
hr = pDispEx->GetNextDispID(fdexEnumAll, dispid, &dispid);
}