Re: VB Activex dll in VC++ with array parameter

From:

Andrea Visinoni <andrea.visinoni@gmail.com>

Newsgroups:

microsoft.public.vc.mfc

Date:

Thu, 3 Mar 2011 00:54:08 -0800 (PST)

Message-ID:

<2bcb8de2-dd6a-4bcb-82cd-10c532850c96@b8g2000vbi.googlegroups.com>

On 2 Mar, 16:35, Andrea Visinoni <andrea.visin...@gmail.com> wrote:

I'm trying to use a VB Activex dll in VC++ 6.0 following this
procedure:http://support.microsoft.com/kb/194873/en-us

i successfully create my idispatch class but some members are not
being correctly created due to:

method 'GetReading' not emitted because of invalid return type or
parameter type

this happen with all the methods with array as parameters, the only
thing i know about this method is that in VB is like this:

GetReading (sSerNum, By Ref dRdgArray(0 to 3))

so i'ts an array of double, i want to manually add it.

Any hints?

I did some steps...

this is the prototype of the method as seen in ole/com object viewer:

[id(0x60030002)]
        HRESULT FindQpods(
                        [in, out] SAFEARRAY(BSTR)* SNArray,
                        [out, retval] long* );

info by docs are: FindQpods (By Ref sSNArray(0 to 32)) [=lRtnVal]

this is how i'm trying to implement it into my dispatch class:

long _cQPod::FindQpods(SAFEARRAY *array)
{
    VARIANT pVarOut;
    VariantInit(&pVarOut);
    pVarOut.vt = VT_ARRAY|VT_BSTR|VT_BYREF;
    pVarOut.parray = array;

    long result;
    static BYTE parms[] = VTS_PVARIANT;//VTS_VARIANT;

    InvokeHelper(0x60030002, DISPATCH_METHOD, VT_I4, (void*)&result,
parms, array);
    return result;
}

but i still get: Warning: constructing COleException, scode =
DISP_E_TYPEMISMATCH ($80020005).