Passing variant array from VBScript to ATL
Hi,
I'm trying to pass a variant array from VBScript to my ActiveX
Component written using ATL. The code is something like this
//////////////////////////////
VBScript
--------
Dim InputArgs(1)
Dim OutputArgs(0)
Dim Status
InputArgs(0) = 34
returnVal = MyObject.DoSomething("Action", InputArgs, OutputArgs)
ATL
----
STDMETHODIMP CMyObject::DoSomething(BSTR bstrName, VARIANT vInArgs,
VARIANT *pvOutArgs)
{
//what should i do here ???
return S_OK;
Quote:
}
//////////////////////////////
How can I get the input argument values in the ATL Code. The value of
vInArgs.vt is VT_VARIANT|VT_BYREF, however vInArgs.pvarVal doesn't
contain valid data.
TIA
Rohitab Batra
http://www.*-*-*.com/
------------------------------------------------------------------------
------------
Disclaimer: Any errors in spelling, tact or fact are transmission errors
Sent via Deja.com
http://www.*-*-*.com/
