c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
' S. x  \0 y: j0 \. c* e) P3 DName = (WCHAR *) L"Poke";
                
8 X0 Y( r. ?  B% R        hr = m_pDisp->GetIDsOfNames (
  M; o( @7 G4 q; V: `                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
  p* m: |- K2 p/ G  E                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
! X3 W8 r+ b7 g        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }

4 X- _4 Z1 E6 G  b6 t1 _% R/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
0 Y! m% N9 f* L( W2 _       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
9 l) A3 `9 d7 t2 {        VariantInit(&pokeVariant[0]);
+ C, ~. d$ V0 F& b0 h        pokeVariant[0].vt                 = VT_BSTR;
2 D, ~1 \8 c5 f* B8 ?8 z        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
! c. I. v9 c, N* u  q) q5 w0 Z        VariantInit(&pokeVariant[1]);
0 ~  X0 E6 P  Y. c3 Q* }# x9 ]        pokeVariant[1].vt                 = VT_BSTR;
" A0 @6 d' X* R- W2 y- d; h* B        pokeVariant[1].bstrVal         = itemStr;
9 T& u/ {: C# t8 n
0 e5 z& a) ^, a2 {+ j. W( Q          topicStr                                 = SysAllocString((WCHAR *) L"system");
7 X% b2 i4 V5 N) n( i; M; W; y. [        VariantInit(&pokeVariant[2]);
; j! u# f, A* R. v* j3 L        pokeVariant[2].vt                 = VT_BSTR;
6 ]& A% g* L5 c3 X& y3 G        pokeVariant[2].bstrVal         = topicStr;
4 t/ M$ A" v. C: C& f
//        Set the DISPPARAMS structure that holds the variant.
3 f7 U9 R* p/ G  P7 F9 O3 Z" \7 R! G
+ ^8 F  P6 ^, H0 ]6 B. o& z8 n- `        dp.rgvarg                                         = pokeVariant;
7 f" O7 v- L$ _  m4 H        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

: H4 y* B$ [, R$ q( v//        Call IDispatch::Invoke()

$ |# G* a- B% X' ]4 l; J5 ^! j        hr = m_pDisp->Invoke(
                pokeID,
0 B' }! }, F) Z                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
8 x6 ?  D3 q+ Q' C& I# y; a9 K) V2 G                &dp,
9 V5 u+ B% E1 z1 A                NULL,
, _: [7 f" Y3 Y& t: [. z                &ei,
                &uiErr);

1 x$ ]5 ^1 \* r: D        SysFreeString(topicStr);
( W. \/ k. d4 N* [2 ^5 f8 h7 e8 u        SysFreeString(itemStr);
$ p. F9 _3 c& o( l8 {5 @& m        SysFreeString(valueStr);
7 A2 _1 |. a) N: f1 r
. V* V7 @+ _* c, x现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
3 p, G# S( s; {此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
( t( ~# N6 d+ s. y/ X1 Z

  s% E( i: {; h. R2.这是request的程序
4 g/ y/ Q5 ~  i- c' b/ c//  Request a value from Extend
) ~% k! b/ n  U" }( _//
" l& D2 \& g; Z//        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
1 A' V* o5 z# i5 d//        BSTR into the variant structure.

9 z  w+ K0 ~# X6 `, H$ {7 l        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
$ A+ t3 w' @2 ^: e# F+ ~& z       
& E5 K4 V' F$ p* H! c' W         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
7 K+ I: R( j1 [        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
+ ~; t5 o: c4 J  }$ D  U1 L        requestVariant[1].bstrVal         = topicStr;

7 q0 U4 I: T; V# i% X9 B//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
4 C% Z) C, M: S- r& Z0 d        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
4 d% @4 e1 |( E4 g9 y8 }( r% M        dp2.cNamedArgs                                 = 0;
- u) I# X+ ]: n$ o' [2 ^4 ~
0 ~9 |( Z4 b/ d, r" S         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
: U1 ^( f6 B( X- @
        hr = m_pDisp->Invoke(
& ?! m$ u7 {" o$ o                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
/ g% T/ j; ]) D' a1 Z# Z" s+ k                &dp2,
                &var,
; B+ K: B* X8 L  X9 N                &ei,
8 d7 ]$ m: @" Q                &uiErr);

$ d* p/ f0 @' h. C* P: ?        SysFreeString(topicStr);
8 J4 d" ]% j" P3 g: d* w2 H7 I8 ^        SysFreeString(itemStr);
& U2 ~; ?* j& J( }0 F% x请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？