c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
; h" M2 W: N: A+ w/ U  i0 y8 D                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
  {& X# N  F/ Q0 D2 G8 G6 v                &Name,                                        // Array of names to get IDs for
( t9 U7 C* N9 N8 \' Z+ h                1,                                        // # of names in the array
; e- H6 o; t1 U2 d1 z( X                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
! _1 L3 [- z! y- p! e5 m                       
. {7 V0 {4 K( {        if (hr)
) v% l: @9 y) q                {
                MessageBox ("Get Poke Unsuccessful");
  ?3 K' s4 I8 I& W# i                return;
" u7 }. a9 D( `/ j! c                }

; t9 s, [8 s+ S# e/**************************传递数据给extend**************************************/
: C# X6 @3 R; D! @        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
' u8 b3 u( I2 T! ]2 |7 y! k       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
9 v- Q; N7 e# v$ S" o! b& O        VariantInit(&pokeVariant[0]);
+ Z$ v6 z8 t. J& ~4 ]7 A  Z        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
- u7 D4 Y0 b6 f" X7 i1 O  g
9 Q5 `- u2 B" u( E/ S; v         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
& n5 F; D( a. o3 _+ m
          topicStr                                 = SysAllocString((WCHAR *) L"system");
8 Q# _8 r3 I. c        VariantInit(&pokeVariant[2]);
% y& C, Y& v; K/ Y, T        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

1 F6 ?2 K/ b. E3 y* ?3 n        dp.rgvarg                                         = pokeVariant;
* G: n5 W6 W0 t" f        dp.cArgs                                         = 3;
$ H2 H  E* H. a1 Z        dp.rgdispidNamedArgs                 = NULL;
# \9 G+ Q0 }" R3 N5 Q        dp.cNamedArgs                                 = 0;
8 \9 [' _( l: E! C% b) Q
& c+ c" Q* Q+ v; q, Y//        Call IDispatch::Invoke()
# o0 K- j/ I* R) C  n
6 v6 a; o# e) A        hr = m_pDisp->Invoke(
                pokeID,
9 h+ B1 L/ i7 _; `1 l: @                IID_NULL,
& o/ h0 n! ]# e6 J                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
' {; @2 y7 Z$ q0 w                &ei,
( z, H$ f' b! Q( I                &uiErr);
. L+ Y+ t  @! c- g; B& p1 @
# X7 _5 |. i/ j" E( p: j! o& j        SysFreeString(topicStr);
: H2 }  x5 q1 f6 ^( Z        SysFreeString(itemStr);
        SysFreeString(valueStr);
" I# V8 ^( B3 I# _; {3 z2 ]* g8 z- y
- T3 Q* r6 @1 a, B现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
" y2 m; }: q8 X4 s: B

, N4 _1 e  _/ w2.这是request的程序
: u! W: U2 D  b* _3 Z  _//  Request a value from Extend
: i+ o% C, p" O9 q1 m5 T6 h//
//        Initialize the variant that will hold the BSTR.  Set the variant's
' N# q5 T0 z. ?/ D, B# [8 g& q//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
; W* u  m2 G) X5 _7 I! v+ s
8 V7 e7 U" ~  K        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
! ~% H) c- g! W8 ?  F! N5 N" `7 ~& s        VariantInit(&requestVariant[0]);
" w5 y) @# m0 ^2 ^) `! c& m        requestVariant[0].vt                 = VT_BSTR;
# F! y2 W* P' k+ r7 H        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
: z* @3 H7 B' H4 q
//        Set the DISPPARAMS structure that holds the variant.
% f3 t( R0 N! W8 [
6 J, F+ V- o, ^' x2 O) `1 V) {. j        dp2.rgvarg                                         = requestVariant;
1 V' \" i! [& @, E        dp2.cArgs                                         = 2;
& `2 A6 G9 ?% `1 R        dp2.rgdispidNamedArgs                 = NULL;
) s2 [2 |3 \) K7 L2 ]) k; n! p$ g        dp2.cNamedArgs                                 = 0;

& ]2 ~- z' D$ A6 }( V* M4 Q$ Y         var.vt = VT_EMPTY;

+ r, U7 y* P) K# w& k0 ]//        Call IDispatch::Invoke()
( B3 {1 [8 y, t5 C* T- }( m% e
        hr = m_pDisp->Invoke(
                requestID,
  j  u: C) \- V0 C6 p                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
, e; d- d  i& ^) r! b' u                DISPATCH_METHOD,
                &dp2,
8 p" B* @( g0 G5 \% p& h% s                &var,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
; C: S6 p! b4 }$ c% r3 L2 P1 a        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
8 J+ G. B) o& V) q1 W4 y# `如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？