c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
$ }! P7 W( I1 t! ]2 W        hr = m_pDisp->GetIDsOfNames (
& G# N2 E( ~0 f& U0 t% [                IID_NULL,                                // reserved
$ C/ S8 t) `0 n5 s* N0 B. O; x4 Q, u                &Name,                                        // Array of names to get IDs for
5 _) q9 @2 `7 P, \2 @" K4 G, T2 n                1,                                        // # of names in the array
6 C& t# R  \/ i( y$ @4 d0 K                LOCALE_SYSTEM_DEFAULT,        // System locale
& k* _2 `% J& Z: f! `5 L                &pokeID);                                // Array of IDs to fill on output
  l: I4 Y3 A$ H; ^                       
        if (hr)
                {
1 M) {7 v0 \; r# R2 D0 d: _8 D3 g                MessageBox ("Get Poke Unsuccessful");
                return;
  ]) \( b+ c7 Y2 o( P) r, K& H: j                }

/**************************传递数据给extend**************************************/
' F- W, ^1 T+ `% M, H        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
: y$ P. v- i7 |7 d9 G       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
6 A- a( A# E# ]        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
; ~9 Q5 h. y; Y/ f# r" ?        pokeVariant[0].bstrVal         = valueStr;

. q( q" ~. ]& g) B& r8 K         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
1 H! o8 ~7 [; y/ \        pokeVariant[1].bstrVal         = itemStr;
9 C# `  i/ x4 j& x1 a# \$ [
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
  m  u* g6 T0 E: q1 x+ k+ u
5 A" d: z" O1 I7 J" j//        Set the DISPPARAMS structure that holds the variant.

0 _$ A- n  Q, K, V- W- i5 ]  a: t        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
# H" c1 \- Z9 S        dp.rgdispidNamedArgs                 = NULL;
, D0 K3 C: i" R3 f; {5 W        dp.cNamedArgs                                 = 0;
; b6 V( I7 E1 M7 b, D; A
! ^  s& e& H, M: j+ b- }//        Call IDispatch::Invoke()

4 l. x/ V- X; E% R4 J0 b/ c* K        hr = m_pDisp->Invoke(
# @0 W% c$ {. n1 v                pokeID,
9 W. _1 A2 f+ _$ P) ?$ R- L1 G                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
- ~. Y, T. {. E3 R- M                DISPATCH_METHOD,
                &dp,
+ y( P- s6 ]0 `1 i                NULL,
                &ei,
7 ]/ k3 Q# \4 l/ F8 O                &uiErr);
8 m( _* i: ?% p: e9 T* g" O  y
        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
' b/ V; B& z. ]1 b" Y5 f; `
& B0 T+ _; ]3 w  y现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
0 e9 U  \! i. G, R) y' ?此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
% |* U# [9 \! d" I  Y2 u0 y+ J
# g& R- M9 ]( X# O9 I, o4 |
" @. ~- I: p& n2 j2.这是request的程序
//  Request a value from Extend
//
, Z1 v( R8 y$ R9 K! B: I" D//        Initialize the variant that will hold the BSTR.  Set the variant's
7 L' q$ @8 C& I* a2 `" n6 }' }//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

" t" e' f* D: I) _# S5 d        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 b, m/ l# F! S5 g) w/ K        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

' H3 a/ w) X( `; E          topicStr                                         = SysAllocString((WCHAR *) L"system");
- V8 R4 q: z4 F0 c        VariantInit(&requestVariant[1]);
9 ~. B6 M( M# D        requestVariant[1].vt                 = VT_BSTR;
0 C! @/ F7 n. Z  H3 a        requestVariant[1].bstrVal         = topicStr;

' m# n( A; S8 n8 m, O+ L//        Set the DISPPARAMS structure that holds the variant.
( T5 q0 `3 o3 u% h- ~
1 N. ^5 o- A- |; \        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
/ ~0 ?3 t1 p! Y7 ~- j        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
) m1 O( U3 y2 ~6 L* j8 _6 y
5 v8 e! ]% p) n. Z* r% t: W//        Call IDispatch::Invoke()
3 |' p' m6 k2 \+ R7 U$ x" o
/ V7 b" n, j/ g* L+ n  o        hr = m_pDisp->Invoke(
1 Y5 V9 h# O/ f* w5 E+ |+ i! ^4 l4 A                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
- l  l8 V! ~0 x  P                &dp2,
9 `( D0 }- \# l) s- e( E) r8 L                &var,
                &ei,
0 x. ~$ L* w: ]8 |; S, q8 N: h                &uiErr);

& ^& d* [; h# s. U5 s        SysFreeString(topicStr);
        SysFreeString(itemStr);
) D2 T' H0 z2 [" A( C请问该程序是获得extend里面的哪个值？
* S: O* f& C1 m如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？