c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
/ t7 e" K( W" n: }/ e0 f                
        hr = m_pDisp->GetIDsOfNames (
9 s* v* z) S; F( C$ C                IID_NULL,                                // reserved
/ f, Z/ [0 f, r3 [) O& ~0 q6 D$ n                &Name,                                        // Array of names to get IDs for
. G  ~1 C' z( }; |+ F                1,                                        // # of names in the array
0 n1 L* ~( U2 b! i$ I0 x8 ^                LOCALE_SYSTEM_DEFAULT,        // System locale
/ u, B8 O* L! _) Z3 X                &pokeID);                                // Array of IDs to fill on output
: W7 m8 Q" ?; U" y3 K. L2 t3 a                       
( Y4 s. ]9 O% z* ?8 e. l& q9 c6 G        if (hr)
( c; ?' j* E' B                {
  x( ?# G" U( A( j. K                MessageBox ("Get Poke Unsuccessful");
                return;
. m# }& l; h5 J- j' `                }

5 f; Q& q. f1 X& R/**************************传递数据给extend**************************************/
$ f6 e4 m6 Z7 Y9 Y1 w5 Q# K        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
5 _" k+ d' G/ w* X. Y         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
  _7 |6 C$ N, k% M        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
  A. E& S) ~8 I# z        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
4 W  l2 E; x' Y* o  ^, b/ Q* v        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
  a) ?, u. c6 @6 _" }( a* V        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
3 s# x  V: @$ D; E% m
/ ]7 U+ y) b( |! l" L' e3 A//        Set the DISPPARAMS structure that holds the variant.
' R: C' _- L& J% }: x* v, E
) l3 n2 V0 h. W* Q. E; [6 i; f        dp.rgvarg                                         = pokeVariant;
1 |# w7 H( U/ |! s9 `        dp.cArgs                                         = 3;
  ]- k% ]; t) v) l        dp.rgdispidNamedArgs                 = NULL;
5 x* ^' l$ B: w/ v3 l        dp.cNamedArgs                                 = 0;

4 E6 v$ ?2 q, R2 T//        Call IDispatch::Invoke()
" K) p- J) N" |5 f/ [
- S' l6 S0 B( i6 X        hr = m_pDisp->Invoke(
2 |/ ~" f  z6 O: ^+ @                pokeID,
$ j, b$ {- q* k( S$ M6 w                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
! t+ o$ F! c+ R6 h  G8 f                DISPATCH_METHOD,
                &dp,
                NULL,
# l5 F5 J: M: K- Q* }8 L/ W3 l                &ei,
0 G" ]( o5 e0 j! I# k                &uiErr);
: o) K3 c, \/ [! \) S9 A
        SysFreeString(topicStr);
        SysFreeString(itemStr);
+ v* E- O: C: b. R  w# ?        SysFreeString(valueStr);
" k4 u: E" M: r5 A4 B. N
8 l& F6 z4 U* g5 u  M( C现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
4 v0 G& `: M. H/ b0 |$ w. k此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

, L. {- [2 M5 ]" j8 X2 H# c7 L  q( E
8 T2 e0 @8 p: _- C# _7 X8 ?! b+ X2.这是request的程序
* Z+ I8 l) }% I6 B5 L9 q- c3 Y//  Request a value from Extend
//
//        Initialize the variant that will hold the BSTR.  Set the variant's
( C1 ~% B- |$ O//        type flag to indicate the fact that this variant holds a BSTR. Place the
. _$ {$ d$ ]; k0 @' Q//        BSTR into the variant structure.

) i: s$ m( a2 g5 R4 Z3 f        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
) e# @$ K. d8 b8 l& p$ H       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
& S: R) ?0 Q1 U        requestVariant[0].bstrVal         = itemStr;
$ v& z& K; [) @* A
" g- p5 I" b- p: t$ a$ C: L          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
" \, v: d. B) S) S; t        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

3 Z. E% u2 @+ f7 A# |        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
% z+ m" Y8 r" v, H6 {. U( J) e
        var.vt = VT_EMPTY;
3 n0 K0 `) x# s  v
' U/ _: U9 @: O( B# {- o//        Call IDispatch::Invoke()
) u7 E/ q5 e3 `
. _$ z+ u  P; c8 ~# H0 a$ m& m( J        hr = m_pDisp->Invoke(
) U: g: \  X7 V' x+ S                requestID,
) ~7 N% q4 c2 u" l) C( m; X! t3 H                IID_NULL,
4 N7 b" r, z0 b7 K                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
1 @* @: X2 R2 H; X$ r8 t  ?                &var,
                &ei,
# j1 _% c4 T2 L, S" P5 J& V                &uiErr);
# C5 ~2 @$ K6 C( g4 v. |4 j
+ [* p, z$ {; h9 i+ q# H        SysFreeString(topicStr);
) m; I# u# T: @; T$ Y2 f2 {1 [  j        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
0 E7 U6 y" G8 Q; Z8 H# ]; U  l* L如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？