c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
* o* p/ D% S  d- E; w, C* W9 y. QName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
3 ]: w) T4 k" Q" I                IID_NULL,                                // reserved
- `1 R% `4 u9 y3 W/ O                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
& y% M  z& m2 p+ x                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
! {& O; g* o* h9 E2 y& u                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
$ @: `- K: _8 e                }

/**************************传递数据给extend**************************************/
" T3 `" K$ g& K        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
$ k! N: H% M, `& {) T       
5 o  ?( |0 V& |/ I7 O3 T* x         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

9 }4 d1 Z+ K) d9 b7 g& ~2 U         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
! U2 U' o0 U& s( X# ]! o& C$ @3 f. _3 Z
- ~$ b1 d. V/ n+ L- j+ I- z2 E          topicStr                                 = SysAllocString((WCHAR *) L"system");
2 o$ Y; y+ e# P. t        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
1 e- y3 y' n& `; G5 H
" R7 g9 U: E4 x/ M//        Set the DISPPARAMS structure that holds the variant.
' x( A: `/ y) D4 A  a7 d7 ^: r# ^
+ ^; K7 Q* o4 s        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
, v: N4 T# h) W  I& ~" S        dp.rgdispidNamedArgs                 = NULL;
$ [& H6 Z, J' E% e9 C& S        dp.cNamedArgs                                 = 0;
  u, _; Y! m/ V/ x& Q: j
0 J, o9 g" f( x2 [' e1 C1 J5 Z9 m//        Call IDispatch::Invoke()
, a. p: m) d1 a( f
, d0 Q  m% C8 N. _- X6 \7 w        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
0 [8 _8 ?3 W! ]/ `; {                LOCALE_SYSTEM_DEFAULT,
0 c5 L# o9 P, e9 c( E  A                DISPATCH_METHOD,
2 U8 q4 }5 Q$ B: Q' T& G. @* n                &dp,
9 y# j1 T7 T7 E/ A, S1 K                NULL,
3 G5 p" H: s1 O, O# I                &ei,
7 ~. c/ L3 J! f# x5 d6 u# z                &uiErr);
  |5 Z+ f* b' L2 v' `1 ]
1 W$ U) T% t" {2 f3 H7 f        SysFreeString(topicStr);
        SysFreeString(itemStr);
1 Q2 ^& s4 Y1 e5 x4 ?% k3 K        SysFreeString(valueStr);
( K+ v+ Y+ j7 }7 E0 x) |
; `! a4 e$ y3 l8 V现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
9 j6 I7 D3 \7 m( s. J此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

$ g% Z6 C0 y7 ?# m' `
# I$ L! t0 Z( E# _0 }% T2.这是request的程序
+ G  j9 r# H" T; H  a! j- d1 f4 m//  Request a value from Extend
7 M& O+ D: J& g3 v9 E& F//
//        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.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
& p+ Z3 W. B: e' p       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
2 {# ^4 O9 B* h9 J$ x% C* J2 }        requestVariant[0].vt                 = VT_BSTR;
! S' c5 A) [" U# T# R& _        requestVariant[0].bstrVal         = itemStr;

9 O1 [/ q* Z3 H, _3 M          topicStr                                         = SysAllocString((WCHAR *) L"system");
2 \0 k. q- h' H( B        VariantInit(&requestVariant[1]);
- Y& `9 J0 F; f7 Z% v" F  I2 u        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
7 G9 Z  p# H  |% A( `4 @
7 L- l0 g8 _+ M  @6 J0 Q( D//        Set the DISPPARAMS structure that holds the variant.

, \  t) V! F9 X$ E        dp2.rgvarg                                         = requestVariant;
* X1 H1 F; D3 n        dp2.cArgs                                         = 2;
6 \, ~1 z/ f! F        dp2.rgdispidNamedArgs                 = NULL;
$ i; v. S6 l7 k4 s3 N        dp2.cNamedArgs                                 = 0;
/ C% ~7 R6 K- Z# y1 L2 `
        var.vt = VT_EMPTY;
0 N; n1 n5 f! m& A1 q, I+ }% ~
//        Call IDispatch::Invoke()
8 k: b4 R* Q$ a+ B7 w
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
! Q& u- m' |8 a8 ~9 c8 Q% d                &dp2,
                &var,
( L3 I* y; T4 v" _9 I                &ei,
; }5 r3 ^6 K* U8 X0 B                &uiErr);

1 C; x. u% o5 K' s1 A* m' B- t        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？