c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
5 a: w1 S* O* @) O/ {. C; r7 @6 OName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
# v. j$ X2 f5 e- v! @  o                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
: M" b: c8 {( T  B: f                &pokeID);                                // Array of IDs to fill on output
' x/ e1 Q* ]1 K; h1 w* p: {                       
6 G% V9 g/ B( t( z4 ?7 ]: o        if (hr)
; c3 M* x0 S* F2 W; e                {
                MessageBox ("Get Poke Unsuccessful");
6 A3 B0 ^  K5 U2 v8 B$ q3 d$ J4 V6 D                return;
                }

+ l+ c' j) _6 q9 r3 C5 {# A  n/**************************传递数据给extend**************************************/
. A& y' F# x. u3 D        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
" R% u4 S7 {- X% Y       
2 ~# K8 L: _; ]7 G* X" \( s$ n         valueStr                                 = SysAllocString((WCHAR *) L"1232");
( r! n4 b1 }; c5 A# `. F+ J6 Q; S        VariantInit(&pokeVariant[0]);
/ D/ v% r$ W+ `8 p& C9 I+ O        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
+ l2 r3 N. O' o8 L9 D
, h8 v- G* H0 L. ]2 e& Q* X( L         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
. J/ d4 C3 J/ _        VariantInit(&pokeVariant[1]);
( Y3 S0 M  z" |4 b+ F7 [        pokeVariant[1].vt                 = VT_BSTR;
" J, F5 t, ]; u        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
6 b2 `+ S' ^: L  ^  W/ }        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
; ]' M- x  z, j  w1 o7 N0 l0 b+ `
# z; N% W) _, G//        Set the DISPPARAMS structure that holds the variant.
9 X3 \" ^( \9 g3 y
        dp.rgvarg                                         = pokeVariant;
' P/ w6 J. [- z        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
6 W5 r1 B! u) V; y
//        Call IDispatch::Invoke()
& @  |: _$ T  a* s* N/ L
        hr = m_pDisp->Invoke(
3 m/ g6 F( T/ d/ V2 r/ F+ Y                pokeID,
                IID_NULL,
4 s/ M2 A: ^: U7 a+ w4 U                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
6 J( u3 ~# j2 U% t& w6 W                &dp,
                NULL,
                &ei,
1 L& i; ]( {  }$ `! H7 C: s                &uiErr);
* H+ k/ S5 f! O# @4 A0 j4 ?  Z
        SysFreeString(topicStr);
! j. ^. q: b1 a5 ?5 A        SysFreeString(itemStr);
        SysFreeString(valueStr);
% l- i8 A  m8 z* o2 D% y4 b$ M# g
1 S- S, i& v  d9 r' w! x! C现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
. k# }  x- z1 p* M2 @- ^此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


% D' f* p6 }5 g8 I0 U7 }2.这是request的程序
//  Request a value from Extend
//
% o" e( I. j; a9 O  K& c3 A8 M//        Initialize the variant that will hold the BSTR.  Set the variant's
4 C( }0 ~' V, _1 F/ N$ a//        type flag to indicate the fact that this variant holds a BSTR. Place the
2 j- U  _  G" G# w//        BSTR into the variant structure.
3 D6 @  L/ Z0 R% k4 k
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
9 O, P: |9 A$ v& {+ w( H, d# V       
8 Q" Y6 u0 J) Z5 r1 U; I5 }6 |         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- D7 X; u, o5 p5 _. D9 Q        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
6 g9 M7 v- Z" e9 b0 ]        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
* J& h. I$ v& i6 f
//        Set the DISPPARAMS structure that holds the variant.
1 |% T# g$ Z7 U0 F5 q0 T, e
        dp2.rgvarg                                         = requestVariant;
) B+ v# h& K6 C: {. p        dp2.cArgs                                         = 2;
4 e( k$ ?: {9 a+ }1 T        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

, b# ~  ]7 k5 N5 O//        Call IDispatch::Invoke()
7 ~' m2 A8 U  d9 P5 G  ~. Y. _
. r3 S" D9 i% K9 h% l6 J        hr = m_pDisp->Invoke(
                requestID,
* T- D( H$ r7 L  W                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
( }9 a3 e  p4 p' s                DISPATCH_METHOD,
                &dp2,
                &var,
. E. s; \6 t4 t/ t' k$ n                &ei,
/ G6 a+ S) g. `* U7 Y; r2 S# o/ [                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
: ^4 ^! v0 o$ [( v5 G如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？