c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
4 P7 c1 V. \+ z+ o. k# V+ Z) p                
: [" O' N0 O5 [        hr = m_pDisp->GetIDsOfNames (
- N; E  q* y3 v) P0 s: N                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
7 m/ `1 q6 {7 M" S! {7 j7 U) X9 ]9 Z                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
4 z  M- }3 B: y2 M2 V4 |( o                &pokeID);                                // Array of IDs to fill on output
+ ?! J5 G8 D# w" x) ]                       
        if (hr)
3 S7 _" f& O% f2 t" u: p6 Y' a, Z8 C                {
, |' x9 {2 c% A  M% {                MessageBox ("Get Poke Unsuccessful");
" W8 R  V. ^: @. n1 r% @                return;
                }

: Z  b: U' s, c7 z% H; E6 m, G4 h/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
( `! I+ w: q/ x/ o         valueStr                                 = SysAllocString((WCHAR *) L"1232");
9 V$ a: G9 U* W3 x* b$ G. }# B        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
: s3 a0 c2 T/ e* j/ B9 N+ y1 x        pokeVariant[0].bstrVal         = valueStr;
4 ]+ P  f* k* \* ?& e
* P1 W6 H) B/ u$ G: Z; s         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( B* Z( n. u# h" N7 a" E1 M/ K        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
: h, c! L2 X+ V/ u4 U# ?  A2 C        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
* l* s+ e2 G/ F1 }) z0 h- c        VariantInit(&pokeVariant[2]);
% Z0 v( s5 z+ J0 _        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
% I- X& x  p' o# s+ o" c3 w% P
//        Set the DISPPARAMS structure that holds the variant.
$ q; v/ U8 t) u2 _; \
        dp.rgvarg                                         = pokeVariant;
4 v$ w: |, H/ y: P+ H& [        dp.cArgs                                         = 3;
5 r! w7 \+ s" J# W        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
* \* b& V) l$ q
# N$ C0 w! d* ^; }2 W        hr = m_pDisp->Invoke(
$ n9 K  v1 p1 w5 G$ Q                pokeID,
- x8 Y& `6 O( V                IID_NULL,
. l! V$ o$ R# y" o                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
( R: F( O8 |2 s                NULL,
  p1 v- w! a7 z" ?/ b( C                &ei,
                &uiErr);

+ w/ n+ x& e) M* B. c" U5 N3 d        SysFreeString(topicStr);
        SysFreeString(itemStr);
% Q( t! ~. k  B: k$ K5 t        SysFreeString(valueStr);
. I# m$ K: g) R1 @. g
6 q6 H% R. q; M9 G4 f现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
. D) \  D$ Q1 ]此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

1 c$ @, Z5 G$ P) A0 e
7 ^1 _) t1 s4 o2 F) W2.这是request的程序
7 g( l/ i  c* d$ h( u( }( x//  Request a value from Extend
//
  ^. y2 m) ~4 ?& h( |8 L//        Initialize the variant that will hold the BSTR.  Set the variant's
4 F. r: H+ B! f3 u! V//        type flag to indicate the fact that this variant holds a BSTR. Place the
! m: r; s5 c( K0 r//        BSTR into the variant structure.
' E4 o% s; F# d# j$ r" M. R
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
! h5 ?% s% u3 }$ E0 k) {         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
7 H/ ^+ i" g. ^3 V  w8 d8 N        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
& L# T, i5 T( f* O
          topicStr                                         = SysAllocString((WCHAR *) L"system");
3 P# w/ L5 p5 l* _6 e8 \$ A        VariantInit(&requestVariant[1]);
5 E4 t! g/ @% d" k2 v1 k8 J( r        requestVariant[1].vt                 = VT_BSTR;
* ]2 a) N+ f7 K2 S- j$ t        requestVariant[1].bstrVal         = topicStr;

- i' J3 I5 ]  x" e) D/ c7 l& h//        Set the DISPPARAMS structure that holds the variant.
6 ]5 g' Q: q+ G/ K( d) S
/ W# p3 M  q+ }( q        dp2.rgvarg                                         = requestVariant;
/ |2 O) E# d. i: ]! o        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
7 C& B% `* U: t9 w9 y3 I
7 {6 p& {% \0 C& A% }% V8 ^) a$ }2 o         var.vt = VT_EMPTY;
; z8 \" {5 v5 d( L# v
$ I& O6 Y' Y3 D0 [+ \//        Call IDispatch::Invoke()
  u& i5 A) m  P* K2 u8 k1 E
        hr = m_pDisp->Invoke(
, {  l/ ^3 Y, ~* F2 D+ L$ D                requestID,
. ~- n/ h' W  |1 v) b# D                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
) f9 l- q: c2 d+ a                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
+ m0 Y" ]4 w- T2 k$ W6 c& Y8 L                &uiErr);

# M8 t' ?% O+ K, @& w        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
: x+ g. a2 |; ~+ }: S如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？