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
1 }- [& A) l# l. X$ V                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
8 k- {9 \6 F. |        if (hr)
1 ~8 m* a' S! H& t  P; t/ q                {
5 g/ i5 v. Y" r                MessageBox ("Get Poke Unsuccessful");
                return;
& u' K5 i( S% r5 N" u                }
8 o) D8 [9 v  ?7 U+ j  p" ~
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
0 _: u  D2 ]' P4 k$ G        VariantInit(&pokeVariant[0]);
7 s# k/ n# @, t6 x$ a; X6 U        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
3 J/ W2 g1 m; a
0 u# T5 O. ^7 w- c  b, x& D( z' w         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
% p5 ?6 O  A. c) D& F9 [- F        pokeVariant[1].vt                 = VT_BSTR;
; a# o; K0 B, S, M2 \: }        pokeVariant[1].bstrVal         = itemStr;
" d' n- f9 u( B9 r! C
+ V# U) f* @0 C" E+ f5 k          topicStr                                 = SysAllocString((WCHAR *) L"system");
. f0 G7 N4 B1 h- N$ F$ X        VariantInit(&pokeVariant[2]);
5 ]. W/ @$ m  w% C/ L3 g! H6 H        pokeVariant[2].vt                 = VT_BSTR;
8 r$ b  ?; `- F  d' _' K        pokeVariant[2].bstrVal         = topicStr;
: i6 ]) U5 o6 Q1 a7 H: p
) h. w- W( Y) f; ]: O) Y0 P/ v4 @//        Set the DISPPARAMS structure that holds the variant.

7 `4 i: L) D; I        dp.rgvarg                                         = pokeVariant;
& G( d9 U& J& s, H( t* Q# x6 @        dp.cArgs                                         = 3;
( A' w4 F* x# a, E        dp.rgdispidNamedArgs                 = NULL;
7 [3 U+ c0 b* J4 h! ~: b        dp.cNamedArgs                                 = 0;
. _0 m# R. Z; m6 f: x
//        Call IDispatch::Invoke()
5 f7 D9 V) t* I! d- P7 E
( a& W3 w8 B% n( n; E4 I& L        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
$ x. ~. v' X) j6 \" @% m; y                LOCALE_SYSTEM_DEFAULT,
1 d) ?. d8 f  J, n+ U' z0 \                DISPATCH_METHOD,
( K1 f0 Y  u# M; i5 ^0 V% j                &dp,
7 c; P8 V) _. Q8 K! a                NULL,
" s5 D3 M+ o4 r4 M8 ~                &ei,
7 _* w5 b) M  M, F& t+ I: Y                &uiErr);

5 x! i# e/ f# R$ Q        SysFreeString(topicStr);
        SysFreeString(itemStr);
- @" C% ^5 p: z  H2 i5 X        SysFreeString(valueStr);

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


' ]0 b8 C8 c0 \* F  t2.这是request的程序
, e5 u' J" Q0 q1 q8 G- k, h//  Request a value from Extend
( x8 O/ C5 Z; M, L5 g) r//
' N2 \& w1 t5 l8 W% |% b; l//        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.
) C  I; w2 a. o' B- K5 d
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
8 ~! \1 O: A' M6 h! a3 x* @8 Y) I         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( f/ E4 {' z/ p9 ^% k3 b* y        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
1 e4 T; H( z1 h        requestVariant[0].bstrVal         = itemStr;
% h% J, W+ x2 ]: o+ |
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
+ T! Z7 |" m& N0 l  d
//        Set the DISPPARAMS structure that holds the variant.
: V, D8 _5 N' t3 \4 f, P4 E  N
3 w3 F0 b9 b# G. w        dp2.rgvarg                                         = requestVariant;
6 g9 o! c3 g, _  |0 _3 u9 z) w9 k) S        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
% O) x( r% w3 |+ @; K$ G        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

; }: K  ]/ J2 m! \( F: v6 \        hr = m_pDisp->Invoke(
                requestID,
2 M3 P4 ~1 B  c# m' }                IID_NULL,
; k& _9 l4 a2 B, T% v9 L# {                LOCALE_SYSTEM_DEFAULT,
3 ~8 x8 W0 q) D: E* d1 h                DISPATCH_METHOD,
) d( ?7 {& i- m! \4 M                &dp2,
                &var,
                &ei,
/ L  ~; D0 r* i3 P4 Y; O7 t, t2 k$ f                &uiErr);
& t5 F5 u1 G7 M3 V9 \
        SysFreeString(topicStr);
- j, F$ s. j/ h) ]/ ^: M  x3 f        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
( I! F3 d$ V: H2 z; B! A9 e- _+ ^5 `如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？