c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
1 {: U) W6 e( L& L% u        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
) i3 B+ d, b) a2 C/ O                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
& `1 s( e0 b' l/ f3 ^: C                }

5 P; C! M; x3 e  b% B5 e/**************************传递数据给extend**************************************/
; u4 d8 l! n$ F5 a: y        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
- Q% j- F$ n( f( ~& ^% J        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
! S! D) M9 ~" X. T0 }        pokeVariant[0].bstrVal         = valueStr;
- F& o! z! E. S. R3 z7 D6 y
+ b7 e! _6 }# q& g+ x. K! X         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
6 u2 ~( s+ P1 E! w4 h( x        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
& @) B) w8 L! I1 q2 I
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
  R$ W4 _% M( T1 j        pokeVariant[2].vt                 = VT_BSTR;
' V3 \% c5 \0 j0 |. P3 d8 e8 M        pokeVariant[2].bstrVal         = topicStr;
6 o' ~) o9 ]$ g1 l
//        Set the DISPPARAMS structure that holds the variant.
+ R/ A, ?' A4 r
        dp.rgvarg                                         = pokeVariant;
5 |2 b  i8 D9 }: U( G9 `        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
4 R* u) J' t" R. p' x* x2 w        dp.cNamedArgs                                 = 0;
- J8 \3 V& \# W- r+ T, @
//        Call IDispatch::Invoke()

1 [4 T+ \" U8 u, S0 {! I        hr = m_pDisp->Invoke(
1 Q# o* Y; r3 N; \                pokeID,
- Q$ I* N2 V7 f% r; I# j                IID_NULL,
% c/ Q/ A# u/ I- V6 C' S                LOCALE_SYSTEM_DEFAULT,
8 c+ P2 u. s; P% E, P* X6 ?  T                DISPATCH_METHOD,
1 x  b  R- c% t' M6 G5 q                &dp,
                NULL,
                &ei,
                &uiErr);

3 e) ]# F7 `$ s+ k        SysFreeString(topicStr);
! m& F; h$ w- I+ {. ^# w6 A        SysFreeString(itemStr);
        SysFreeString(valueStr);

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

% g* d4 L' X& G3 U& o+ [
2.这是request的程序
//  Request a value from Extend
8 v1 I! d" S* c% G( O+ `//
4 c" M$ g$ U, L5 W: o* T( A  j//        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
9 C* ~3 E- |0 r+ d$ _# Q//        BSTR into the variant structure.

( ]) v- x# {$ w+ h6 y  S' d" A        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
' q  l. T+ {3 W0 K' l, B         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- ?# ?' g( k  d0 W% O        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
6 z% d. w) U+ O) A; R! v# o" ~        requestVariant[0].bstrVal         = itemStr;
* P! d: j# n/ m2 L
          topicStr                                         = SysAllocString((WCHAR *) L"system");
( S) j9 w4 G5 _        VariantInit(&requestVariant[1]);
+ N' B0 t6 P5 ^        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
$ i, i2 f+ ^2 O, @8 B7 H
+ {7 P' B3 |9 s4 X* z- t//        Set the DISPPARAMS structure that holds the variant.

& ^0 x$ q4 R! ?) r) e3 L3 `        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
9 l, E$ C1 M3 L9 ~* b        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

! ^+ f+ I3 U% G) J4 n        hr = m_pDisp->Invoke(
, {& Y: V% H6 K4 ]/ h; J( B                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
# y4 n) H' z, h. r: v                DISPATCH_METHOD,
                &dp2,
                &var,
; [" w% ?5 |: {                &ei,
# {$ f: r* f& e% k6 R) o                &uiErr);
  Y' F3 @1 p/ O7 K
        SysFreeString(topicStr);
7 [; M) `5 h) U0 }" d        SysFreeString(itemStr);
7 C6 ^2 h" _! O7 x! w请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？