c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
        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
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
' a# I, \9 q, b/ i8 H5 i' Y                }
( {$ \/ R: J! T; z4 V
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
& D+ C# u; v# M. D. ]2 _# u/ ^       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
. o% ?  Q( X; w+ |  O8 G; q  x        VariantInit(&pokeVariant[1]);
. @! {4 Q/ k2 I% q) S        pokeVariant[1].vt                 = VT_BSTR;
2 y7 @4 t' b! [1 O        pokeVariant[1].bstrVal         = itemStr;

) H5 h! F0 `, q* {          topicStr                                 = SysAllocString((WCHAR *) L"system");
! G0 \+ s4 d6 {) n- z        VariantInit(&pokeVariant[2]);
2 M, Q$ z/ c" F& F; x1 o# u. l  V& N        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
$ U0 z' A9 d) o
//        Set the DISPPARAMS structure that holds the variant.
5 \# i5 n: D9 P  H- c, C
+ E2 |4 @, Q. a. j% [3 R        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
4 g3 N8 o. ]7 c% D5 Q/ M        dp.cNamedArgs                                 = 0;
% N, F+ d6 I1 R
//        Call IDispatch::Invoke()

( B; @; _1 n& u0 ~' ~; I        hr = m_pDisp->Invoke(
5 q( x/ h6 x  _                pokeID,
                IID_NULL,
. t# u0 I- V# l# R- M. f                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
4 G8 D( i0 H* l4 ]. u                &dp,
                NULL,
                &ei,
/ n: {  R& z: a$ w& v$ W3 |5 ^                &uiErr);

        SysFreeString(topicStr);
6 N; C( J' O# F5 d/ J( x& W; k        SysFreeString(itemStr);
        SysFreeString(valueStr);
- I% I( K6 L7 W, Q, t: [
' O, n7 ^( h. r& y现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
8 k8 J  l% r2 z1 q0 z# w此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
) A1 d# o5 x! e$ \" I( l/ f//  Request a value from Extend
9 N' @2 Z1 b8 [2 `: g2 h* B+ e0 V//
' g9 S% O/ \+ _! P7 W//        Initialize the variant that will hold the BSTR.  Set the variant's
  a5 Z7 Z8 C( {" w- a+ d5 A& a//        type flag to indicate the fact that this variant holds a BSTR. Place the
( `" p3 K9 X$ ?$ m//        BSTR into the variant structure.

: V% w9 |% `* G0 Y) q        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
2 @6 }# M+ {% r( o       
( r( |4 }7 Y, g7 P& @' E         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
' r: f+ m6 g2 K: r& V3 N2 i* z        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
# C$ C( A% T# L! ?: e  ]
          topicStr                                         = SysAllocString((WCHAR *) L"system");
8 ^/ U( k0 a; q7 C        VariantInit(&requestVariant[1]);
( o: L9 `" ]9 g0 @- r9 h2 ~/ x3 g        requestVariant[1].vt                 = VT_BSTR;
# f+ g# M' A7 F; b+ m        requestVariant[1].bstrVal         = topicStr;
; a8 Y0 X3 z3 G0 f' Q" ]
1 x6 G6 l8 h" M" c//        Set the DISPPARAMS structure that holds the variant.
' v! R/ M3 [1 u+ n9 r2 ?* c* @$ L
        dp2.rgvarg                                         = requestVariant;
2 b# }" X' @! L8 S; y9 t        dp2.cArgs                                         = 2;
% I6 T: N+ }3 G! |- v        dp2.rgdispidNamedArgs                 = NULL;
* y0 U7 D8 b+ A1 m        dp2.cNamedArgs                                 = 0;
. G3 c) t) I# {; J; Y
$ K$ w, N  V8 o; o3 D         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
6 Y, [# t/ g% f1 `: T6 y
4 O  G5 s* o" s1 r8 v        hr = m_pDisp->Invoke(
( m8 f" v6 z) l: w" y+ t8 s0 K                requestID,
                IID_NULL,
/ T8 `  l# A1 y$ s' ^; N                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
% O: E7 t$ G% [                &dp2,
1 `2 R+ d3 H3 Y  \6 i                &var,
9 G; S) n5 y; g" x                &ei,
                &uiErr);

( ~# R/ N$ w, D: J) q! Z6 |/ R        SysFreeString(topicStr);
: ^' V' d0 M5 p. {: E! K$ U        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
4 k  J, {7 S! c& G4 }0 o; r如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？