c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
: ~  `& O1 }8 C" |3 p; t# MName = (WCHAR *) L"Poke";
$ Y2 g( _' \, ?& l2 o, y                
2 m- c/ x: m( g8 G& L  f: e        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
# {$ _& J- }' s- w                &Name,                                        // Array of names to get IDs for
0 f! V" d- F+ u. L3 }3 Q                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
* M6 U2 p" p+ @7 {* _3 p1 c                &pokeID);                                // Array of IDs to fill on output
                       
  ]3 d0 z4 v: l  J; V) ?6 {        if (hr)
                {
3 j  {8 V3 M; Z: ]: l. e$ v                MessageBox ("Get Poke Unsuccessful");
3 v9 F1 w' w# ]5 m9 Y                return;
                }
7 [4 c$ v. O( i' _2 K7 T
  G7 i0 I0 W* m2 ^/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
# o% _8 d: ]* P& a9 l; h       
+ p0 V7 K3 Z. B/ z: C         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
) z5 W: G; J- m        pokeVariant[0].bstrVal         = valueStr;
! y, p$ }5 t$ s- J2 D3 l
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
9 M% g& ]/ G* E6 g" ~  e6 X/ I        pokeVariant[1].vt                 = VT_BSTR;
& ]2 L9 ~4 w2 y+ Y! d9 {        pokeVariant[1].bstrVal         = itemStr;

  d2 I1 a1 p( \2 D  H. [          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
" e0 ]. y7 i& {. z& V4 K        pokeVariant[2].vt                 = VT_BSTR;
. u% A% U- O* t" Q& |: f        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

; e4 A7 O" ?  c$ N/ {/ l0 M% ]: U        hr = m_pDisp->Invoke(
0 e! R/ H/ ~1 B% d8 Q                pokeID,
  n$ ]/ G7 g% Z) d4 w+ j                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
# o# w, E: F' L7 k                NULL,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
% i$ `/ x- W3 @9 |4 ?        SysFreeString(valueStr);
% c; k" {: r% K* K! Q
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
" D% X) v1 j& Z4 B9 Y8 @9 }此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
) M# A. }9 w( J

2.这是request的程序
//  Request a value from Extend
5 n. ~/ e/ A: W  F2 r//
//        Initialize the variant that will hold the BSTR.  Set the variant's
//        type flag to indicate the fact that this variant holds a BSTR. Place the
$ Z. @9 U* p; `9 R& \$ {/ a//        BSTR into the variant structure.
6 f0 W9 k3 P- w( v  }) H
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
( ?4 B: ]  }4 Z4 \$ v0 l  {       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
3 d5 k+ X8 m  `  k) M        VariantInit(&requestVariant[0]);
- b6 ]$ g4 H+ s3 S( A- J        requestVariant[0].vt                 = VT_BSTR;
- d, [1 H/ X0 v  t. n        requestVariant[0].bstrVal         = itemStr;
9 E8 A! v, S( i& e" w% ~3 Y
          topicStr                                         = SysAllocString((WCHAR *) L"system");
8 X" E$ }0 b" S        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
5 v. M9 W3 n6 d+ t        requestVariant[1].bstrVal         = topicStr;

5 ^: u% H/ `% _//        Set the DISPPARAMS structure that holds the variant.

" U) z1 Y5 {- ]$ n+ F: O: q% p/ f        dp2.rgvarg                                         = requestVariant;
+ C: s5 ]* g% V/ m( N; m$ l& U) J; `        dp2.cArgs                                         = 2;
& X0 v2 _1 f( \6 A  S        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

* Q; U) E' C9 {& Y# ^2 Z: F( \         var.vt = VT_EMPTY;
6 V" z/ P8 b6 }1 b3 W
9 h; G3 M$ C, d: P* D8 C//        Call IDispatch::Invoke()
! w1 k- s# b4 G3 U  k! K
        hr = m_pDisp->Invoke(
6 y6 z5 M6 {: \. }2 N; c8 G3 Z; T8 I, n                requestID,
! i) V; j5 t0 ]- S* x1 O# K                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
) Y6 q* b. L8 l( c6 j7 N3 I- i3 W                DISPATCH_METHOD,
; \8 T& j- R' Q$ ^! y                &dp2,
                &var,
# I" c9 F4 a- s" `5 m                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
) D  J; Z$ N& S请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？