c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
, M( Q5 U9 U  ?3 s                
- I% f, q& U3 T6 x' x        hr = m_pDisp->GetIDsOfNames (
# S/ d1 s/ }' Q$ |4 T                IID_NULL,                                // reserved
- X8 w" o( o! p; v2 X9 {" C                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
; S- s+ F+ A! L. H                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
" {2 ~+ ]7 b- q3 F7 q* \                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
- M4 v. y# l7 N8 c& h. V: p                }

0 Y1 L; s+ n) j. ?5 L/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
% H7 X4 ^$ S" k* e       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
' X2 N/ {+ \8 O: E3 ?# _& k        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
4 @" n" M. x; a2 j2 o/ C, x- W        pokeVariant[0].bstrVal         = valueStr;
4 \8 Y5 i: c; i, y
# b  F6 v+ |1 A! _$ M& V* u0 ^6 [% ~' N         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
. }: b5 W2 x( i, s) n! G        VariantInit(&pokeVariant[1]);
2 q$ h8 e7 }" [8 c! I% I. O5 V        pokeVariant[1].vt                 = VT_BSTR;
& y: g! B- ^8 x0 V/ t        pokeVariant[1].bstrVal         = itemStr;
: V9 [. i2 D1 ~- p
5 `7 y5 j- E0 e          topicStr                                 = SysAllocString((WCHAR *) L"system");
  B; d) C& x, `- r0 M        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
$ D  s: s* @: A. G        pokeVariant[2].bstrVal         = topicStr;
6 t6 r8 ?7 t# x- [- }
. A5 J- a' l/ O/ q9 w//        Set the DISPPARAMS structure that holds the variant.
- J/ X  Z2 J4 K& D0 m$ H+ G3 _
$ g/ G+ H5 R- T# g  z) c6 H        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
4 D6 ?0 z4 r) ]- f1 U
0 m" W& S' p7 @4 b% _" k. u//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
, {: U* s* C' f( R$ f( q4 H) d                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
- |3 j( l# K- M* L1 @: g1 O                &dp,
* z! e" l3 F( {) F& B6 f                NULL,
/ P. s6 y! Q2 ]- V+ ?                &ei,
                &uiErr);
6 l1 E. i* r% V; ?/ j* E- O
/ w+ Q; C, J* H# @" C% D/ [        SysFreeString(topicStr);
( I4 ?5 m2 U* K        SysFreeString(itemStr);
        SysFreeString(valueStr);

, A( h. {/ A8 \5 L; z8 x现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
) B" D' R/ @$ l' k' f: J5 [此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
* d* |1 k( d+ L% H- D

2.这是request的程序
//  Request a value from Extend
4 c0 ~( p0 I) n# v- k, W$ x  M. |9 T- T( g//
1 ?  W5 e/ M; j//        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
3 C/ K% e5 y4 T9 }* k2 ~//        BSTR into the variant structure.
8 k( A+ u, b2 C5 J5 E
! J( j0 g$ E& X! J        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( J; K+ G: a, G8 l' |+ t7 ?        VariantInit(&requestVariant[0]);
4 H) I. v5 k" \% Y* T  Y' `, B        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
0 T/ v& ]2 j+ {; O" x4 X
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
+ x* b( f0 E" f; w  q7 Z) K        requestVariant[1].vt                 = VT_BSTR;
! v# n' v1 W5 c4 l        requestVariant[1].bstrVal         = topicStr;
3 J* j) p4 y( j6 r0 x
//        Set the DISPPARAMS structure that holds the variant.
0 h0 ?( K4 ?& v1 V% E. ^
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
" N0 y$ l$ T$ W& O9 P; {4 W& N+ G8 y8 `9 D
4 w) Z# j2 {2 n0 C; P        hr = m_pDisp->Invoke(
5 h# K8 s4 s9 P2 p                requestID,
                IID_NULL,
- l* Y: l1 Q9 H" s3 j2 F# n! m                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
                &uiErr);
2 u6 Y+ R. f  F6 k- B
0 l' V1 ?# q" v0 a0 e% o3 L        SysFreeString(topicStr);
        SysFreeString(itemStr);
5 F1 Z2 Z6 a3 E% Y: {; ]" q请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？