c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
$ [/ Y2 P) |' i5 \Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
: h& K4 v) k3 Z! w% H1 B# c4 e$ A                IID_NULL,                                // reserved
* C% b  j& l0 L" k3 e$ C( ]4 N                &Name,                                        // Array of names to get IDs for
8 d$ ?3 K. v) J1 K                1,                                        // # of names in the array
  D0 L* L9 T, \2 S                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
: K0 y+ v9 D& b                {
' `: S& u4 K" k: _3 s                MessageBox ("Get Poke Unsuccessful");
+ R5 |1 W3 V* a: A, Y, d5 O                return;
                }
- v& r+ o% |2 C) N
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
4 B+ J7 Q# y& u) z' w       
* ~# [5 l- A9 z% F) j; h         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
; f' j; W4 ^6 U6 q        pokeVariant[0].vt                 = VT_BSTR;
& T3 I4 F; n% A, D! q        pokeVariant[0].bstrVal         = valueStr;
* z0 z+ r$ A- Y( s. R; ^
$ R6 ?' i% ~# `         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
7 E- V8 K9 b9 Y0 j/ o% o        pokeVariant[1].vt                 = VT_BSTR;
4 H# q; N. @1 a$ y, ]# v2 r5 ^  @        pokeVariant[1].bstrVal         = itemStr;
. w2 c" o; i2 K
" ^; q; L% u* I7 m+ k          topicStr                                 = SysAllocString((WCHAR *) L"system");
% u! ]8 R7 S+ Z7 ?( h) g        VariantInit(&pokeVariant[2]);
" ^: i" }/ h( I' X2 I2 w        pokeVariant[2].vt                 = VT_BSTR;
) D9 b' r3 b4 ?4 @& s) k        pokeVariant[2].bstrVal         = topicStr;

( R" Z7 o* W$ S1 ?2 Z- x//        Set the DISPPARAMS structure that holds the variant.
0 S. U$ x, @+ q/ ]9 T0 p/ M& K& u& g
0 f* ^# U+ o- K, }0 b        dp.rgvarg                                         = pokeVariant;
  L9 b9 W' r; }7 f: P        dp.cArgs                                         = 3;
5 t# M: |8 B% b' a* }        dp.rgdispidNamedArgs                 = NULL;
# `5 ^/ ~* j$ Z1 H        dp.cNamedArgs                                 = 0;
7 k. o" w1 j, U( m! q
//        Call IDispatch::Invoke()

# @* M  M1 u9 O+ r" f3 K% m  W) K3 }        hr = m_pDisp->Invoke(
8 P: V3 G6 K1 M8 N  W. T( D% b                pokeID,
" o8 j4 @3 W$ b                IID_NULL,
3 ^! @! |; F* X% b5 Y  g+ }                LOCALE_SYSTEM_DEFAULT,
1 E- J7 l, i8 ^3 a9 U+ t                DISPATCH_METHOD,
                &dp,
                NULL,
                &ei,
1 B6 L# K: c0 x" U4 Y1 o8 B                &uiErr);
0 U0 }0 r# a4 Z+ E+ |" [6 e
        SysFreeString(topicStr);
, @: x, n5 |6 W) H5 Q5 R/ I        SysFreeString(itemStr);
. ~& |' S! b; _, u3 z        SysFreeString(valueStr);
% @2 J, t% r6 W( q1 a
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
, R& S3 z& b" i  b: e* `: [此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

- I% }2 k. _2 j; F
2.这是request的程序
3 G4 }  H8 x4 u) t+ J0 ?0 R, q//  Request a value from Extend
//
//        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
7 |, |2 }/ S2 C$ F) x$ B//        BSTR into the variant structure.
6 p! J( `& }  F5 u
/ Q- I6 @4 l5 m" X3 H: s& ^        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 ^. e, a' x" j6 u) a' [        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
$ _$ Z  i0 N6 p5 k3 V! U2 X+ u        requestVariant[0].bstrVal         = itemStr;
1 x6 N4 w' I- g: V
0 ~. j; T' x0 n6 `2 |' V          topicStr                                         = SysAllocString((WCHAR *) L"system");
: M; N6 b$ W# D  K        VariantInit(&requestVariant[1]);
% I* x6 Q' C* G& J" y        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
) T7 S9 O: y8 J* _
//        Set the DISPPARAMS structure that holds the variant.
- z! {+ e: S; J; {2 C
5 i/ h( P9 x! L3 I; ~; k5 w2 A        dp2.rgvarg                                         = requestVariant;
" S# M7 D6 }$ v2 e1 N( n        dp2.cArgs                                         = 2;
, L/ C$ ^3 r: e8 Y; \        dp2.rgdispidNamedArgs                 = NULL;
3 u, e7 O" G2 L% E8 S* Y2 U: Y& G        dp2.cNamedArgs                                 = 0;
$ ?' ]0 Y" f: E' R
; A) t1 s* P% ^5 y' I         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

' E) f, y$ \  Z; ~) Y        hr = m_pDisp->Invoke(
                requestID,
2 l6 `4 h  U  K$ u8 T( Z: Q  y                IID_NULL,
+ V; F$ v5 I# m8 G' X1 ]                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
; x: G7 i& N/ B3 A( ~9 w) s# L9 I                &uiErr);
! b- z) d6 h+ u
        SysFreeString(topicStr);
. Q# X- n3 x+ F0 u6 H        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
* Q7 v, O) K' z/ V7 R0 @如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？