c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
) }" T$ A3 b  v) v% z4 h: C                
        hr = m_pDisp->GetIDsOfNames (
% o& d' p/ x' ^% N, H                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
& ?* s+ B: X# l4 x: _                &pokeID);                                // Array of IDs to fill on output
                       
- M2 U+ r" V& [7 Y8 v- Q        if (hr)
% V! K$ B, |+ d+ H1 E                {
1 a& K% T2 K: v/ d7 F- y9 N0 j& Q& |                MessageBox ("Get Poke Unsuccessful");
% M/ |- Q* _/ h1 ]9 y  e7 \                return;
0 N* Z8 j: _2 q- {2 Z! T$ w% Y                }

5 n" |. I. P3 X1 n: @* p/**************************传递数据给extend**************************************/
& F( W* R$ e) b) a        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
7 B( y5 n, Q( g, C9 [# b  N       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
# O  b; m3 q" x7 I+ G" M        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

( I0 e, a* w$ m% l4 H1 m5 o         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
$ C, b  U3 V2 ?4 H9 \" R        pokeVariant[1].vt                 = VT_BSTR;
7 u2 a3 h- t( p4 S! K" m        pokeVariant[1].bstrVal         = itemStr;

& V/ }2 R8 ?5 [& I; l/ I          topicStr                                 = SysAllocString((WCHAR *) L"system");
! R% }8 ]& \% c        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
' ?* _( n: z( F) `$ [* ~; A
+ \0 o) Q. K$ p: V) u5 K. K7 K//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
1 d3 P5 n. [5 \& b5 i0 C/ ~# A        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
8 m$ O5 ?9 F: b        dp.cNamedArgs                                 = 0;

% X% ]" k) w) o1 i, c//        Call IDispatch::Invoke()
1 G" r% x% q4 s& ~, o7 n
        hr = m_pDisp->Invoke(
5 k- g" o3 b2 u9 Y3 h% E& L2 P                pokeID,
$ s  O" N) a( c6 A' x. D                IID_NULL,
' B$ Q3 s3 z( ~, Q( H/ u4 C                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
* B. `. @6 f$ c! D' `1 N1 k: G                &dp,
                NULL,
5 t/ P0 o1 y# W5 {- ]7 b$ O                &ei,
) S- N9 [1 ^* j1 a) o/ @                &uiErr);
/ X4 ~0 a" w- G* T. J
        SysFreeString(topicStr);
        SysFreeString(itemStr);
4 R0 d" p% N* I. a; ?5 J        SysFreeString(valueStr);
; c6 A; t9 x2 X! \/ K$ Y% B
6 l* s) H/ _; c) q# @0 v3 g现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
& S+ e6 \6 c' Z% A7 a. O此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
) d( d) K" y# O  X% \

+ ~- L4 c  P( H9 S5 x2.这是request的程序
8 h7 {0 a. o  p$ u: k- y# A//  Request a value from Extend
//
* ]- y- Q" U3 `9 `" k6 i8 |//        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
//        BSTR into the variant structure.
2 q/ M! l% h0 g+ v8 M8 V4 L
0 b- x) M) @: f6 g3 e7 I        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
5 B) I$ I: Q( S        requestVariant[0].bstrVal         = itemStr;
7 |( h8 I( K$ C& a& o
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
! y5 G4 s% P8 @# k$ R        requestVariant[1].vt                 = VT_BSTR;
) F( H( x5 p) T8 H. Y3 G% b9 ?        requestVariant[1].bstrVal         = topicStr;

# I; X0 m& L- W: o' b9 x//        Set the DISPPARAMS structure that holds the variant.
1 q( G/ |( T" M
        dp2.rgvarg                                         = requestVariant;
  A5 q# s0 n' S9 x0 u        dp2.cArgs                                         = 2;
/ Z0 o3 m9 e/ B. z. x* F* M        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
  k# g5 `' d& s3 X% n' F5 {
% _# K0 |# A1 V1 @$ v; A& w% z, k4 f         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
  T% j% Z) O$ m7 J. N                requestID,
, }( \( r7 ]: O( O3 w7 G  R                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
! _1 o5 |# a+ v                DISPATCH_METHOD,
% ^; R/ r2 r7 E9 q                &dp2,
                &var,
1 k2 E' g$ r. G" J. ?$ v% z                &ei,
% P3 ~# H0 A0 ~, a: R1 d( R                &uiErr);

        SysFreeString(topicStr);
" p+ ^9 A: w5 e" j        SysFreeString(itemStr);
$ x- ?) U5 P' a* T* k0 n请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？