c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
8 r' C; {7 P6 _  U5 qName = (WCHAR *) L"Poke";
                
2 j/ B3 y0 [3 r6 Y        hr = m_pDisp->GetIDsOfNames (
% e# t  d/ e; C, d                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
) N5 Z0 i0 e  `7 b! K                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
5 T, v' w0 O- E0 v, D                       
. q$ p+ B" S/ N% q        if (hr)
( ~7 r% A( d2 \3 x. [+ h                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
6 V- y# ]$ c4 C# H3 y/ j
/**************************传递数据给extend**************************************/
% t8 S" M" X4 ?3 J        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
5 S: [! A* a0 T) E0 V$ C       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
+ T7 [3 p& _% l        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
2 G+ O6 c+ S- O7 X
* t2 s; H7 j& D$ r         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

! i8 ~1 _) R/ u& ~/ \6 F          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
& m- ~! p1 y6 A3 z& T" X5 }        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

, J3 _/ o* d; `        dp.rgvarg                                         = pokeVariant;
  M. E( ~+ ~( q1 M0 |. d        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

' q1 _4 g' F; u. S0 A//        Call IDispatch::Invoke()
  R4 q1 R" C$ _2 ?+ w
% _' H' T& x! y4 U1 f        hr = m_pDisp->Invoke(
, x2 P5 u% I! I( u3 u( z3 ?0 o                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
) Z' @/ }2 t# j* l1 O9 m                DISPATCH_METHOD,
                &dp,
  i+ l4 h, r& S. |& f; }7 K6 x3 H                NULL,
" p5 q7 B# f& p  K- |2 v                &ei,
                &uiErr);
2 i! @+ I) E5 m, j5 `
2 Q9 Y, t5 Y& R9 }        SysFreeString(topicStr);
        SysFreeString(itemStr);
5 M* w( j1 Z; |3 \        SysFreeString(valueStr);
3 T, y: p( Z* |- K
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

5 q& s: c* |* _2 j+ r- q& u1 h3 E' S& l
9 \* @3 ?; G+ m: I2.这是request的程序
% o, z2 O) K  F, b//  Request a value from Extend
//
0 e0 ?+ w' \9 I  K6 I- z7 ~& r( V//        Initialize the variant that will hold the BSTR.  Set the variant's
- V' A+ _1 \$ c6 ~, o# }6 b  k//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

8 L- x( J# j8 S, v        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
4 D# g2 q' s/ O$ [        requestVariant[0].bstrVal         = itemStr;
4 y3 X. P- |" r! H. t) x; @/ E
          topicStr                                         = SysAllocString((WCHAR *) L"system");
5 Q; l/ N3 x& P; V' c        VariantInit(&requestVariant[1]);
( k$ d* j3 h& B9 Y        requestVariant[1].vt                 = VT_BSTR;
' e* V) i6 C4 K& r5 P0 i5 `' O        requestVariant[1].bstrVal         = topicStr;
7 J- d5 ?, [: M+ P5 F4 A
, a& w+ t& H& T  W3 Q$ `//        Set the DISPPARAMS structure that holds the variant.
4 h& f( l! S  {$ V! {
        dp2.rgvarg                                         = requestVariant;
! S$ a. K' m9 v7 L8 D# }        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
1 z7 h! f3 g3 D4 V        dp2.cNamedArgs                                 = 0;
( H1 m% [! w  n+ d2 m+ d( N
  O" y8 N2 W  f: a0 m0 Q, ^% @6 _         var.vt = VT_EMPTY;
' g" G: h( R/ ]0 Q% m. J& `
% K3 W3 A) M9 y& M//        Call IDispatch::Invoke()
% }) M  W3 j( V& X* ^9 N8 w* m1 J
        hr = m_pDisp->Invoke(
                requestID,
; f$ v/ U6 c: ?9 s; C% i7 V6 ]                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) Q+ U3 H( u" Z  _# v                &dp2,
                &var,
: f& q. s1 ]' n3 f5 X: l9 @" c                &ei,
3 C" N& B8 V! U                &uiErr);

# I9 g& J# k: J9 z% o        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
& E, W. y+ D9 w" {& i4 `3 h如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？