c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
. j. W1 w" Z1 f0 j: v9 Z) ~                
        hr = m_pDisp->GetIDsOfNames (
' X- U' Q# J0 u" U; L% z- C                IID_NULL,                                // reserved
( L& p4 g  f0 x$ g$ D) @6 ~                &Name,                                        // Array of names to get IDs for
: @: Y! r9 m6 h& S1 U' I8 O# a) x& j                1,                                        // # of names in the array
$ Z( W$ X9 O! o% L# E5 C2 D                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
. A1 m5 n4 O# S/ ]2 N8 f                       
" Z1 B+ B! s* z9 y5 C: m" [        if (hr)
% M2 a( @# k6 o% w+ v( S                {
9 I3 u5 o( p% |& c  \                MessageBox ("Get Poke Unsuccessful");
% y/ q7 }" r! m6 B                return;
                }

/**************************传递数据给extend**************************************/
# m1 ?  x2 Z' m+ g- _0 q        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
8 T; d+ h4 H; F( m9 g0 n" x       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
8 K$ O; c/ _4 _( S: ^: a        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
. c  S+ A4 B* H- I        pokeVariant[0].bstrVal         = valueStr;
( p" W6 r6 p5 k1 P  F& w" [
9 E* B. k4 Y6 `7 ?( m' E; `         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
8 n& Z1 i: W2 p, a: z+ A$ f        pokeVariant[1].bstrVal         = itemStr;

. h/ B) ~! Y# m) J9 C  p          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
: a7 V9 p; `5 z) i4 j6 N: j* K" Z/ G- T        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
2 E# P# N8 r( J2 j+ n& f
//        Set the DISPPARAMS structure that holds the variant.
: d2 h7 a) O' i0 D9 j* h" G" F: W
9 t6 U7 Y' R; K: l        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

' m' ^3 A, f6 h! D//        Call IDispatch::Invoke()

; Q) U! L/ \% M- W/ U- {  G        hr = m_pDisp->Invoke(
3 ?  T2 m- N% J- g, |( }/ j0 z                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
6 k5 g( G+ _4 [                &dp,
9 a' E" m' V, p+ B# y                NULL,
                &ei,
, n3 U) O+ c2 W* H& I) v0 a                &uiErr);
( ?+ K3 e  T0 l
& w5 V  D3 A# B. T  N5 [+ Y: Z        SysFreeString(topicStr);
# n+ l' F5 @, N3 {; x9 Q# w1 h7 N        SysFreeString(itemStr);
        SysFreeString(valueStr);
& G3 s" A0 F  C; x* ]* |* r
3 q& e: T) ]  u3 N现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
3 A' U+ e! K+ y0 m1 R, E

, w+ J3 j( z) r% l2 d1 T6 O1 h2.这是request的程序
1 W( o1 |0 h) S0 o//  Request a value from Extend
$ R: V( j* R& Y) w% R//
//        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
6 r& z5 r1 Z, |" b% h( L9 }//        BSTR into the variant structure.
0 P. [' D" P) h
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
4 Q5 v) \1 L4 j4 a       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- |3 R' R: h3 q9 M8 g+ i1 v        VariantInit(&requestVariant[0]);
: U/ e$ f% k1 f. `9 u  l        requestVariant[0].vt                 = VT_BSTR;
" |# ~9 a" D" r        requestVariant[0].bstrVal         = itemStr;

0 T9 N- U/ E' T5 ]7 |          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

, S9 [! w4 @) D( v: v//        Set the DISPPARAMS structure that holds the variant.
. ?) z7 [4 k' U
4 A- P" y& c, d9 P2 O* K8 T! ~& l4 l, z        dp2.rgvarg                                         = requestVariant;
* D: `2 a/ {; g7 l2 j( ]9 M' J        dp2.cArgs                                         = 2;
  q0 I/ b  Z. _1 b1 x' ~' s; @        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
7 B8 Z9 k0 B* u. s0 r& w
/ m1 k0 o, L% a- @7 |         var.vt = VT_EMPTY;

% ^, g. h+ z1 R- @8 X: d//        Call IDispatch::Invoke()

4 T) d% [2 m  l0 X: t# t: Y        hr = m_pDisp->Invoke(
                requestID,
2 O/ }0 w- w1 W- K2 k* l                IID_NULL,
( G8 a9 n, v; f5 \/ c$ q, P                LOCALE_SYSTEM_DEFAULT,
$ F( w& l, ^) j0 G& s; a' x' a                DISPATCH_METHOD,
1 W0 `) |7 O& N& Q* H3 X                &dp2,
. Q: d% U. |+ g/ v* @4 \                &var,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
1 I: d1 d# ^& e0 k6 ]        SysFreeString(itemStr);
  h4 P+ g) D; t, O请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？