c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
" e$ B1 C( @: I) h$ h+ e  m                
+ Y! s. Q1 x+ B7 e2 G5 c+ Y9 E        hr = m_pDisp->GetIDsOfNames (
5 V5 i9 L" e! B  V6 }                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
) [$ p( E, H5 e                1,                                        // # of names in the array
! X5 ?! {9 d: n                LOCALE_SYSTEM_DEFAULT,        // System locale
: g$ {! j4 o- v' H; {. y0 }' d& ]                &pokeID);                                // Array of IDs to fill on output
! T+ x% o: h! q- m3 F$ f  x! {8 q2 F                       
5 `  s$ w5 [; K+ I2 T5 T% S! [6 T7 A        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
2 a; I$ G' f( i/ _. Y
% @# I9 U, m5 `& v) S) L, S/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
6 p2 w, L" b. h$ a0 w9 F/ i+ H  x: n         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
  d* I; j0 x( U5 b# ^        pokeVariant[0].vt                 = VT_BSTR;
7 Q. a+ ]7 u# I' ^. n) E( U3 S+ M        pokeVariant[0].bstrVal         = valueStr;

5 g) r# L: ~8 W1 D/ D9 N3 h. w         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: `  K2 ]; `0 o        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
6 C6 X8 N- S9 c9 p        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

: x, V* ]7 L' [& C$ g) u//        Set the DISPPARAMS structure that holds the variant.

. ?  A- f  P0 x" t1 X8 N        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
0 F8 A3 J# l" X# i1 T! S7 P        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
; n9 Z' G) Y# [/ l$ o3 ~
& L2 f5 f5 h: p! S2 T0 P* |% }% [//        Call IDispatch::Invoke()
# I& j3 u( ]! d9 S! z& t
* z1 A7 r' l/ _+ t$ G  b        hr = m_pDisp->Invoke(
                pokeID,
; G+ N4 G/ S; ], T8 h                IID_NULL,
4 l$ F* m+ y1 K' U                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
! z, _) [. y; ~                &dp,
$ ^5 Y+ p( x- U* [: ?                NULL,
                &ei,
; a) {. M1 G/ i/ t& s( I, \  B  A                &uiErr);

        SysFreeString(topicStr);
, e  I/ |9 X4 e% ]1 _        SysFreeString(itemStr);
        SysFreeString(valueStr);

$ H  L' ], ?% q) ^2 V, i! b现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
; V* U3 H% g6 t# b此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

2 {/ v& W4 W$ a$ Y
2.这是request的程序
: s; C2 B: X  M$ Q2 ]7 l# w$ a//  Request a value from Extend
3 a0 A9 F7 m8 U1 ?- O0 l//
//        Initialize the variant that will hold the BSTR.  Set the variant's
! L( n. R; c3 I% ]//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

/ N, j1 Y- h7 W! h        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
5 z  V2 k+ F3 y4 k        requestVariant[0].vt                 = VT_BSTR;
4 w* F& o! J, V1 P        requestVariant[0].bstrVal         = itemStr;

+ F3 J, @0 a: Q, s          topicStr                                         = SysAllocString((WCHAR *) L"system");
. K" K' G: @" n' A2 W        VariantInit(&requestVariant[1]);
  L  e- ?& P6 [. D9 i        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
3 Z8 \: F1 C6 a5 b
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
1 s. i% V$ W, D! D7 i        dp2.cNamedArgs                                 = 0;
4 n# a+ z! N1 O" k
        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

3 p! O% G: n1 j2 q5 s, x3 X        hr = m_pDisp->Invoke(
8 e" H( C4 K) s/ \0 v                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
; H* c4 d) ^- e) _                DISPATCH_METHOD,
- O  ~1 i9 M6 R- d! R, ~: l" \$ ?                &dp2,
                &var,
                &ei,
# O$ ?2 s9 h" r9 R                &uiErr);

3 L9 u: [5 J9 Z6 J$ n. ]0 m        SysFreeString(topicStr);
1 K* \! S8 x: m3 ?9 V' _' ^. b        SysFreeString(itemStr);
% G9 k& \5 O6 _: ^请问该程序是获得extend里面的哪个值？
4 z( q) K* K/ R7 ?3 {" w& r+ M如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？