c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
& }8 C: j, T/ P& {                
8 b- d& c( ]+ o: r        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
- G, B$ a" f4 y) g                &Name,                                        // Array of names to get IDs for
1 u8 C' k% n6 k- c4 {                1,                                        // # of names in the array
0 q" |$ i3 o* ]8 N4 l/ Z; P& H9 n. R                LOCALE_SYSTEM_DEFAULT,        // System locale
; b* y' w9 g3 E& ]) X! f                &pokeID);                                // Array of IDs to fill on output
7 {$ u- e4 f+ q' f                       
        if (hr)
+ A& }0 D9 `6 [) h! O                {
0 }( v  j) p$ c2 }) w( A                MessageBox ("Get Poke Unsuccessful");
* a: }4 Q4 I6 K                return;
. u5 \& K/ L- h4 _% d- M! H                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
4 S7 u3 K* D" h0 l$ _! F5 O" C7 Z       
$ P& H5 c" S1 m% R5 R; B  c, x0 d- ]         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
5 y5 Z' H. D' ~! M7 k) A% F        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( c! P  E! T- q/ l1 v0 z6 d( G0 [# |        VariantInit(&pokeVariant[1]);
( E4 c9 v& `4 B' W        pokeVariant[1].vt                 = VT_BSTR;
# r+ X# K( R1 O1 u$ l2 |$ _        pokeVariant[1].bstrVal         = itemStr;
4 ]) l5 A! s/ F& Z6 o! ?
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
  S" Z6 ~! p8 G! r8 R* }        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
( s) A# x6 @8 L1 |
//        Set the DISPPARAMS structure that holds the variant.
  w2 b4 u9 Y9 Y* I% S0 t
# @! n! u2 u; g! ?        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
, o1 g' J4 @. N  ?8 U$ ]        dp.rgdispidNamedArgs                 = NULL;
( n7 f! V* h/ F4 n" R; o6 I5 `        dp.cNamedArgs                                 = 0;
) |3 B. Q5 T* {( W& |
//        Call IDispatch::Invoke()
$ p) k, g( z& D8 Q$ J' Y
        hr = m_pDisp->Invoke(
+ e2 ~  F9 B8 V0 K) m- Z                pokeID,
, S$ d: Y# N7 O% a8 a9 d! _                IID_NULL,
6 G1 i, e4 `1 S4 t- P  i+ e                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
. t3 q' M" k2 i+ V) g                NULL,
( }: v  k+ A$ M. E* `                &ei,
                &uiErr);

3 O# B9 W, ]+ [: a; v" _+ e        SysFreeString(topicStr);
4 b' |; a8 R0 R        SysFreeString(itemStr);
        SysFreeString(valueStr);
( u8 T; k  i- Y2 V( V
+ B/ p: H. U3 Z现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
2 \) q3 h! U3 j- Q, m8 p. H此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
5 Y* x- S8 k0 ~7 y9 `; d+ L0 v
! v, U8 G. D+ |# C# [8 b1 c
7 r' M$ ~7 W) k5 W. w2.这是request的程序
# u5 W3 N! n0 c( j5 W* b//  Request a value from Extend
9 v8 S) {& ?4 _( o  x7 b, k//
//        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.
+ y6 _- b1 Y3 P
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
& x7 P& W( q" W$ n& Y       
9 H* S- {2 I) _         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ k) s/ r( m. K& d5 r5 Q        VariantInit(&requestVariant[0]);
9 M" ?: e! D4 [. z: |6 J        requestVariant[0].vt                 = VT_BSTR;
9 y% o- i" M5 f3 F7 V! ^        requestVariant[0].bstrVal         = itemStr;

5 @$ e0 A' V6 ?( G9 K" p$ Q          topicStr                                         = SysAllocString((WCHAR *) L"system");
) F! `; |- ~( Q- E( y% B5 J        VariantInit(&requestVariant[1]);
; w' l/ o8 w8 O; T/ k% S        requestVariant[1].vt                 = VT_BSTR;
( X7 z! R" s- @2 ~' U        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

3 z" i8 p$ w, g; X) s        dp2.rgvarg                                         = requestVariant;
) ~( o/ g0 C9 \: Y9 P        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
% _( P: }" x+ Y! x9 w0 B% m" ~( V        dp2.cNamedArgs                                 = 0;

; _8 r1 e, w# @; p2 L5 Z/ D8 J         var.vt = VT_EMPTY;
# f# n5 T) x% V8 _
, m( P$ n- R0 ]- V; z//        Call IDispatch::Invoke()
0 a! X3 D- A8 h3 |+ d* o, |2 a
7 ?. t- [) B9 z. m1 o        hr = m_pDisp->Invoke(
+ Y( Z" ^5 C; ^' N7 W( @% @: A- ?# h                requestID,
+ [* P9 B3 w' t( `% V3 N                IID_NULL,
  n; B3 L' F2 e$ Z4 o                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
  q' o" R0 K' F( E# q3 ^& u& b                &dp2,
                &var,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
9 ~( Q% l: e% m* B# }' ?& Y' Z$ o  ]请问该程序是获得extend里面的哪个值？
5 s9 o8 {. x, y6 U, s如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？