c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
4 I* n8 C( E& v% E9 e8 K        hr = m_pDisp->GetIDsOfNames (
7 c6 r5 e( X1 Y, [- V                IID_NULL,                                // reserved
2 o( J8 ^' @" I3 Y0 [                &Name,                                        // Array of names to get IDs for
% d+ q6 _; K- V7 K7 [4 l7 B% x                1,                                        // # of names in the array
5 }) ?2 Y: G$ {2 W$ P' L( M                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
" h: f( S" q6 n1 w        if (hr)
' b# F$ @6 q: Z3 P) b$ ]$ z! p( R                {
                MessageBox ("Get Poke Unsuccessful");
0 O" \8 W" e* }/ z5 n+ `                return;
% S8 J, w8 _3 k                }
( N( \! b4 @3 O4 j) p. [5 |
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
; \: |7 o  ]  ?% S       
- K& p. s9 J% i6 n' P& ?         valueStr                                 = SysAllocString((WCHAR *) L"1232");
# O/ Q0 b& j( z  s  K        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
2 J) |8 ]+ q+ @' o1 N        pokeVariant[0].bstrVal         = valueStr;
. k* W7 x9 L3 D, `8 f
& J; W  E/ B* C% H/ h, W         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
  @- O' n( m9 }: O& w        VariantInit(&pokeVariant[1]);
' G7 o  [5 i  O- _- v( i  |        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

+ z) @% g$ x" x' ~          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
" L# Z! }. X$ D0 W        pokeVariant[2].bstrVal         = topicStr;

! |$ l4 G# T# T7 K//        Set the DISPPARAMS structure that holds the variant.
7 l$ H0 @+ h/ d$ S" n- ]% J
! Z+ _# v( Y6 l% \        dp.rgvarg                                         = pokeVariant;
: e2 S% {$ R3 j- s6 q4 H        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
: i# K" k7 _! g) ^2 m. C        dp.cNamedArgs                                 = 0;

8 \' Z$ e8 ~+ _) {2 [7 h- f. ~//        Call IDispatch::Invoke()
* O/ A; R8 r$ [. H& m' q& _! n
        hr = m_pDisp->Invoke(
                pokeID,
, T, b1 s# `* I) P2 x                IID_NULL,
- u* u1 ^6 f0 O0 T3 B# X) \                LOCALE_SYSTEM_DEFAULT,
' y: i$ c, P3 {1 m4 ^                DISPATCH_METHOD,
                &dp,
                NULL,
2 I; a4 ~3 U: h: {% c( b* V$ I                &ei,
                &uiErr);
& L# s: j' h+ Z* \0 P. g7 B6 V2 O
        SysFreeString(topicStr);
: b2 d3 R# y9 Z        SysFreeString(itemStr);
% `  G; z4 V( t) |: _        SysFreeString(valueStr);
5 l! @, V# u0 U$ s, [
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
( F* C0 s6 D0 A/ I& ~8 J3 f此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


8 a8 _$ l6 z1 H8 [! s2.这是request的程序
2 a4 @% t1 b$ `//  Request a value from Extend
( z3 }: A$ T, j0 X7 `2 k9 N  D//
" h2 C% a! Y; F  m: ~3 G//        Initialize the variant that will hold the BSTR.  Set the variant's
( |3 `3 s0 Q7 a% z) ^% L! J  c' K//        type flag to indicate the fact that this variant holds a BSTR. Place the
; i% X+ U. P6 Y- r//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
) O& p" j8 c, S" Z% B0 i8 {4 W- b         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
! n2 i' v, S. n) h) w' E5 u        requestVariant[0].bstrVal         = itemStr;
: k% W% V; [( c+ M
- y! n* F5 L6 e, \          topicStr                                         = SysAllocString((WCHAR *) L"system");
( n1 Z$ i1 j* _7 j! a2 `        VariantInit(&requestVariant[1]);
( u" q$ S7 G  G2 Z3 E! |/ U: t/ u        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
1 f& B' [( o6 W: r; q$ i
" p0 p& K8 k- j( w& I2 Z% ^7 Q: S7 o& ^//        Set the DISPPARAMS structure that holds the variant.

) s1 z! P  `; |' Y1 g+ I  M) ~        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
5 |+ \# ?* [/ e7 u" c; Y3 k
6 ^7 q1 Z+ o# s9 \5 Z* w; I. {+ N         var.vt = VT_EMPTY;

& L7 V; j0 |; x* Q( z  O//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
7 b' p7 h" a. T, S: B                requestID,
                IID_NULL,
# C! M+ V7 h. [- n: `7 z                LOCALE_SYSTEM_DEFAULT,
+ X+ k; R% t- v                DISPATCH_METHOD,
4 T/ G0 b& d  g0 {4 U* t                &dp2,
                &var,
. k" X9 S& k4 ^6 k3 ?! X1 Q                &ei,
6 A0 r. T; G6 S+ O2 h1 b                &uiErr);
. p3 _, n& ?: i9 e. Q
( M" f; Z5 m) E) G. H        SysFreeString(topicStr);
, Z; b- r& f- C        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
9 S. U& Z+ I7 f0 R( ^; J) R如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？