vbscript数组到vc atl的com组件问题

[pgcat]

我用vc写的com组件
STDMETHODIMP CDbOpration::DBAdRecordset(VARIANT buffer)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())

// TODO: Add your implementation code here
if (buffer.vt == (VT_ARRAY))
{
long Dims = SafeArrayGetDim(buffer.parray);
long UpperBounds;
long LowerBounds;
m_piResponse->Write(_variant_t(Dims));
}
else
AfxMessageBox ("Invalid parameter passed in VBtoVC method.\n");
。。。。。 。。。。
return S_OK;
}
在asp中用vb script传一个数组过去
... ...
Dim aFls(2)
aFls(0)="name"
aFls(1)="sex"
file.DBAdRecordset aFls
... ...

总传不过去，请帮我看看问题出在哪里呢

[蒋晟]

http://support.microsoft.com/kb/q154172/

[蒋晟]

VARIANT can hold a wide array of data types. The actual meaning of its data depends on its vt member.

[pgcat]

可是在vbscript中只有VARIANT 类型
我看过wr的几个例子 好象都不行
谢谢大家在指点一下兄弟