c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
: m& \8 u0 }6 l& B4 n# M; F                
/ e% v! t, {) `        hr = m_pDisp->GetIDsOfNames (
6 Q) `: I, ]$ A8 Z, a                IID_NULL,                                // reserved
  J$ Z, g- F, T+ }                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
& V, ^. q# W4 R/ S6 L% j& `                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
5 `6 @/ }  A2 |1 C1 z7 k                       
        if (hr)
  u4 s6 {5 s( U8 w$ H* G- B, M! E; s; K                {
                MessageBox ("Get Poke Unsuccessful");
                return;
- S& |8 e1 k5 r, S0 i/ }                }

5 g- j$ p( Z/ I/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
% U1 o& P7 z5 _/ n       
% _& u6 k* ~- I$ `; ^+ h6 u         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
+ m) {* ~3 i1 N+ }9 s        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 V' z2 G2 T6 q0 L2 c+ z1 _& S        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
4 a0 C/ @3 q+ V- K. x3 L* }+ U1 H
          topicStr                                 = SysAllocString((WCHAR *) L"system");
* W& W( R$ t; Q        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

7 q5 F- l. q4 m) j//        Set the DISPPARAMS structure that holds the variant.

" r4 z' h; O9 Z' E, g6 U! {        dp.rgvarg                                         = pokeVariant;
4 \( V" M! k/ Y3 ?9 j0 ?9 T8 q        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
4 L" ~3 `+ ?7 {+ e/ j, r        dp.cNamedArgs                                 = 0;

4 s2 w8 e& U7 R* e1 d7 u, w9 L//        Call IDispatch::Invoke()
% {" }- U) f* Y
        hr = m_pDisp->Invoke(
  P. l& K& e& m$ _8 i                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
5 K) j, {! ?1 C: l. `                DISPATCH_METHOD,
                &dp,
                NULL,
- l9 q8 ]3 v, ]+ j                &ei,
                &uiErr);

        SysFreeString(topicStr);
! p8 b% Y2 z/ ]( w        SysFreeString(itemStr);
        SysFreeString(valueStr);
8 l4 T) j: f6 ^
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

) X$ Q2 ^( b/ W6 N  k% `
3 N* r/ O& Q" p2.这是request的程序
& j0 u; H' C4 e//  Request a value from Extend
  d( I2 i" e4 s/ `" e: B! [//
//        Initialize the variant that will hold the BSTR.  Set the variant's
: O& O- `, R/ H//        type flag to indicate the fact that this variant holds a BSTR. Place the
, }& C* R, O4 E; G1 N//        BSTR into the variant structure.
0 {$ Y3 o3 E$ G$ G
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
1 q/ k, Z1 {5 H9 V0 G. T4 f# O         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 w5 N3 m0 D) z$ d: |        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
& q( ~, }1 G, P  D" e( e        requestVariant[0].bstrVal         = itemStr;

1 X; d- e$ J2 J0 L# _2 d/ V& z; ?" C          topicStr                                         = SysAllocString((WCHAR *) L"system");
. y! r0 f8 ], f        VariantInit(&requestVariant[1]);
3 u, Q7 \8 x3 x% N; K        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
# B% Q; m& Z* v( W4 F
        dp2.rgvarg                                         = requestVariant;
, c2 ^: c1 [9 J8 w        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
6 v* o/ e, |* I        dp2.cNamedArgs                                 = 0;
9 Y9 I2 a! w* W0 \- f- F. ?% c
0 E  }, o! c2 Z3 A) C. t$ @* @         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

$ V( }5 F! o8 E, B        hr = m_pDisp->Invoke(
7 N' E" p- }0 _7 v4 u$ E) ^1 b0 q                requestID,
  K( D6 B# R( S4 C8 K. B$ Z' J                IID_NULL,
! L& a6 S' F% n  f, Y! V7 K                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
                &var,
# i2 X6 {  e: u                &ei,
% m" H# `; w8 r  k                &uiErr);
4 f% p! N. P$ S2 N2 r7 ^
5 p: y4 T0 j7 Q7 i, w8 s2 B        SysFreeString(topicStr);
  r' p5 u8 c. o+ G+ r/ [        SysFreeString(itemStr);
6 |* p6 G3 c+ {& Y) f7 Y6 C4 P% C7 N请问该程序是获得extend里面的哪个值？
; B7 e% N$ X5 M5 g  D# r如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？