c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
" B% J/ }4 a6 M1 l2 [! Z; r        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
% S, `9 I) R8 X* x  c                &Name,                                        // Array of names to get IDs for
5 m7 `! V' K6 m) X" _1 H- Q                1,                                        // # of names in the array
- D9 B7 a, e6 x) V6 n) K2 V! Z" H                LOCALE_SYSTEM_DEFAULT,        // System locale
/ v7 {4 |7 E: }- C                &pokeID);                                // Array of IDs to fill on output
3 t& o. P$ `* G5 L, b                       
  {2 S$ N$ o3 |8 R7 M* ]        if (hr)
$ e7 ]6 {6 `9 Q1 @! x! T: A7 X4 D                {
                MessageBox ("Get Poke Unsuccessful");
9 [7 @3 r! g; s( X5 j                return;
) T# [0 C( Y2 I0 K, B9 S                }
5 ]- ?: ?1 L  H2 z/ R
! k, y' J2 M- \! t7 m" I/**************************传递数据给extend**************************************/
+ F9 m/ K0 Y1 b        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
4 f6 v/ L4 X  N  i( `2 \/ }0 i
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
' A; W7 Y, y- R+ o        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
. d) H$ c- F5 I5 z        pokeVariant[1].bstrVal         = itemStr;

/ v/ V  I! N9 D) r3 s          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
$ y9 ]( N6 _6 O+ Q; Y: T        pokeVariant[2].bstrVal         = topicStr;

- K: H; y. W* y7 X- S/ H! e2 f( S//        Set the DISPPARAMS structure that holds the variant.
% ?* R4 I$ d8 r1 W; X
3 A, m$ \) }( Q6 F$ {0 O( N8 x. m' ~        dp.rgvarg                                         = pokeVariant;
! x4 Z( J5 a- I1 C# D        dp.cArgs                                         = 3;
! \9 q( c! I0 ~( `        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
) E9 H0 l( U9 n5 z* D# P0 V
7 _0 D+ z# n1 f. q: R//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
; {* |, ^& k' l2 K; ]' \8 j                &dp,
                NULL,
                &ei,
) |) H; I' L8 h, O                &uiErr);
/ k0 b& ^* |2 r  g( N0 S; J, c
        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
( `% x* r( o4 z! i% B" d$ C  x
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
5 U, B; C, ]& W! b& v( u, \% [此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
3 q: y( l0 f. Z! l
4 {' P  D+ X4 A; v8 o- A
% I) g8 q) Z# N8 T2.这是request的程序
$ T& s5 `7 L& [//  Request a value from Extend
//
, A( F" v: ^# L//        Initialize the variant that will hold the BSTR.  Set the variant's
+ t' l; e! E/ @5 h  T4 Q/ M6 b//        type flag to indicate the fact that this variant holds a BSTR. Place the
; @5 b0 u; d0 F& O//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
" G: h3 P, g+ L2 ?# h" ?1 B       
" E0 i- b& N4 a0 C% K         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
) P7 o# U7 t5 l* \        VariantInit(&requestVariant[0]);
9 z& h* l' |8 O# T0 ?- \        requestVariant[0].vt                 = VT_BSTR;
) E& L: Y/ a6 ]1 P  p. F  k        requestVariant[0].bstrVal         = itemStr;
2 o3 x0 K2 W1 \: y' X7 z
  j4 _4 h. j. D          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
5 ]1 f+ x' T2 d        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
' l" g9 h. `' Z8 e$ L" k* m3 `! H
! n7 e, K  U( C        dp2.rgvarg                                         = requestVariant;
* H( [6 Z8 K! _# m( E        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

+ C; t8 D/ h' N5 K         var.vt = VT_EMPTY;
  F  V2 s1 ]. w; Y7 o2 i7 b, h: _
9 A  T$ \' r% H8 u' }//        Call IDispatch::Invoke()

/ r: R+ i3 c; r9 J+ z0 {        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
) \; w$ f' a2 A. p; J$ c' [                DISPATCH_METHOD,
( A8 R0 X( c: D) Y9 L3 g+ `( n$ e+ W                &dp2,
                &var,
                &ei,
                &uiErr);
, x$ Y( u! D. r+ O( z
" p  A, `7 h( D8 p7 l& o        SysFreeString(topicStr);
        SysFreeString(itemStr);
5 P* ]) L8 V" @* a% w请问该程序是获得extend里面的哪个值？
2 S; B' F) _, Q; t5 n, k7 k如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？