c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
8 G+ X5 y' M; A& C# ^. z6 JName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
( C2 b* t4 c+ [8 I$ ]                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
# L0 t+ ~0 k' j; ~                       
        if (hr)
5 v* a% ^# i" ?- C8 |' A: q                {
  o3 b3 O: x2 t4 z/ n8 n                MessageBox ("Get Poke Unsuccessful");
3 o% a  E8 F1 e8 ^! X$ r! m# g                return;
                }

/**************************传递数据给extend**************************************/
2 A* o: ~: I6 o* ?3 j! T        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
) V9 O2 H7 n; E) ~       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
+ v) d, K" |5 _0 D0 i        VariantInit(&pokeVariant[0]);
0 R5 ?% n0 A' ?2 i        pokeVariant[0].vt                 = VT_BSTR;
' k: |) W' u$ F* U) \        pokeVariant[0].bstrVal         = valueStr;

- T9 t4 x( J) \2 p) R  L6 s5 U" u+ O         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 ~; s; d. \/ p6 z% Q0 Y$ S4 o        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
9 z' h9 y. m/ m5 \( s/ n        pokeVariant[1].bstrVal         = itemStr;
! H9 F( p# ?7 B  A6 t" r2 e( v
          topicStr                                 = SysAllocString((WCHAR *) L"system");
) T0 D9 X9 n6 P; C' Q# s# P3 `        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
; O7 c9 ^1 ^9 o! ?, U$ ?: k- S( D        pokeVariant[2].bstrVal         = topicStr;
. \& v9 F1 {" q) F  H" B* z
5 ~3 h9 H% `3 k2 ~//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
6 ?  }2 H$ h9 ?* t        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

- ~: W; q" {. e7 g( J, r        hr = m_pDisp->Invoke(
( N% F# G# L" U: p9 w2 J                pokeID,
; U: m4 X7 b# O) q& j- }                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
; U" R6 [# e1 p- C' j2 d/ z1 |                DISPATCH_METHOD,
8 R5 w: ~  W+ }1 C) A                &dp,
* }' h- {% ^9 _4 A1 s- ~                NULL,
: m7 c4 w5 T" Q" W* |& q& [" e# h                &ei,
                &uiErr);
. c) u1 |! E% Q( u  n6 Q, U2 g" f" @
7 T; M8 ~! }9 z; D6 N. t; W        SysFreeString(topicStr);
8 F0 R. \# x' C, X* {) j        SysFreeString(itemStr);
        SysFreeString(valueStr);
" @& _1 l% f) V; q: C+ \7 D% b
" b; e0 ]( E& q. v3 v9 d2 @现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
7 W5 J! c) }9 t

2.这是request的程序
//  Request a value from Extend
2 L/ H8 _. [( e, I: ~4 n//
//        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
//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
* u# {2 F1 v* U  A       
; }. _, h. E0 R6 C7 G+ S: F         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
& T) J. m' t$ r- a  }        VariantInit(&requestVariant[0]);
" c( u( c( P+ ^! ?: Q, X        requestVariant[0].vt                 = VT_BSTR;
) _+ s: s6 |: K0 `6 \        requestVariant[0].bstrVal         = itemStr;
% q* e* W- _. E
( H2 L, C3 O8 E% M          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
( B1 R' E; Y$ d9 \+ ]9 f        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

# l, e+ @: N6 s1 e//        Set the DISPPARAMS structure that holds the variant.

8 u/ F$ V2 ]# `1 X% S7 k        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
5 b1 m5 r, m+ I" o) Z: u        dp2.cNamedArgs                                 = 0;
1 R/ `) ?. p& ]# Z
        var.vt = VT_EMPTY;
, r9 E* O% w' b7 S- T+ L* k- m: N2 h
4 o) _+ ~& y2 R9 A( h. T" @0 M//        Call IDispatch::Invoke()
7 E" M2 V7 u. \4 G
7 J! Q  j) X" e' B        hr = m_pDisp->Invoke(
                requestID,
5 E3 ~5 y2 p. B& V- n, o# W; A$ A                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
2 j) ?$ S( F. m% O* C$ _2 S                DISPATCH_METHOD,
                &dp2,
                &var,
$ Q4 Y' h% T3 h' N                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
7 |  a# D7 b6 S! T  m' _, L请问该程序是获得extend里面的哪个值？
! s% a% r( T0 I9 R7 S% H: t) A如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？