c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
% C( `. @* |# hName = (WCHAR *) L"Poke";
                
) z. e, a0 d; a. i* h6 a        hr = m_pDisp->GetIDsOfNames (
! f7 p4 u8 w" ]8 s, l                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
; T/ b. \1 b0 `$ R% x( L& X                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
9 Q- g) [4 e+ w# S9 B; U2 \2 |- C$ `                &pokeID);                                // Array of IDs to fill on output
                       
/ K# C) @$ N; @        if (hr)
1 L7 T  I1 ?0 F( M0 o                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
6 E# i# v1 ^, }% H( u
6 w/ b+ V/ d; h5 l1 h# W/**************************传递数据给extend**************************************/
! L) ~9 K; P  l( f. d! @        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
  x: x& L  v4 s% x' v3 L* O         valueStr                                 = SysAllocString((WCHAR *) L"1232");
9 J/ O0 d- Y2 r        VariantInit(&pokeVariant[0]);
9 _$ i; y: D, P        pokeVariant[0].vt                 = VT_BSTR;
8 R0 p- u, ~( u0 J4 w2 b/ E        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
, S+ X  [7 n; k& j  E        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
2 g5 @: }+ {: L& R* L5 n( _: i' V        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
$ ^1 L  _4 B' d7 Q! N        pokeVariant[2].bstrVal         = topicStr;
! L" N# p# T8 `2 ~/ a5 Z* P. E
//        Set the DISPPARAMS structure that holds the variant.
7 {- q' h9 {& h8 F' j; Y% I/ @
0 k7 z+ N+ t1 ~" I3 h  e( f; H6 V$ V        dp.rgvarg                                         = pokeVariant;
- J( ~& X0 r" L        dp.cArgs                                         = 3;
/ o. ?. p, I; N) c; M- j1 U: o& \3 `        dp.rgdispidNamedArgs                 = NULL;
6 p6 u5 A/ n1 f, U        dp.cNamedArgs                                 = 0;

# L0 ?' z' E2 P2 Y; [8 u+ @//        Call IDispatch::Invoke()
0 t5 i+ K0 `, M3 l! h
        hr = m_pDisp->Invoke(
& N4 ]  H: T4 C! ^& @* a" Z- Q; V                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
& i7 I/ N/ m7 _5 ^! s2 e, [$ y( \                DISPATCH_METHOD,
% T$ f& v- k7 r+ b                &dp,
                NULL,
$ ~8 G* ]: Q5 M$ s                &ei,
/ L/ {% \# G/ @" e) ^* p" |                &uiErr);

  A/ V! a6 H; U        SysFreeString(topicStr);
3 w! O# ?) I& s( c4 f7 Y4 v* C        SysFreeString(itemStr);
        SysFreeString(valueStr);

4 S5 X- o8 w9 k9 u' k1 Q) y现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

& m, O0 g0 G7 E
+ k7 S1 ?2 t- k% ]# P- |2.这是request的程序
0 G/ _1 X5 |+ Y4 A' _//  Request a value from Extend
$ I& R$ H0 T6 @7 e//
//        Initialize the variant that will hold the BSTR.  Set the variant's
* X! T( b( F2 E8 ]. t5 }//        type flag to indicate the fact that this variant holds a BSTR. Place the
5 u1 Q5 I* g$ a//        BSTR into the variant structure.
) d; p: H: a7 w+ U( r
: i1 D7 |5 m3 g8 V; u2 t        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
1 C5 ?/ a( \: k) @       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
( t- @# v7 T: W7 {- x        requestVariant[0].bstrVal         = itemStr;
& ?# o. w) ~  Q; @
% E+ D& Q$ ~% b7 N: r, i9 }          topicStr                                         = SysAllocString((WCHAR *) L"system");
5 o/ T; D4 }" |9 n) B1 K$ [        VariantInit(&requestVariant[1]);
( w( M, ?4 s! A6 Z& r! p        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
) {! o) |' y1 P$ [) l$ E
0 e, ^9 R1 X. w- P" J5 X        dp2.rgvarg                                         = requestVariant;
5 `( z  |" @" A5 `        dp2.cArgs                                         = 2;
( g7 v" p) Q6 c) V& i, F# b. p        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

7 v; [9 J5 F# j  B+ N4 D8 y         var.vt = VT_EMPTY;
. B$ |. ^, \7 b- P
( K; n! `& N. Y$ x//        Call IDispatch::Invoke()
$ {5 _! _. Y8 o4 X
6 B' ], w2 S! Z# n8 L8 Z# N" d3 {2 q        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
/ C! S  y1 ^$ o0 v) |4 w9 M                LOCALE_SYSTEM_DEFAULT,
. F8 {3 o* b: h4 |; P                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
/ I2 X% ?( U! w6 H: f6 n如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？