c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
& s: o" P+ {% I! }# k7 R" A6 |Name = (WCHAR *) L"Poke";
3 Q6 `+ g% f  X* z; t                
' s+ {7 M5 E/ R        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
% i8 P, D  Z. K. D/ V; k                1,                                        // # of names in the array
, u. x' C! Q+ m1 D& b  z                LOCALE_SYSTEM_DEFAULT,        // System locale
' j- p4 C6 x7 F' c# a% }9 z                &pokeID);                                // Array of IDs to fill on output
  {7 c& k& l9 o3 H                       
; D; E# E) X+ L, A        if (hr)
$ @" a0 r! N/ e                {
, V; _$ `. n3 a+ a$ l1 O                MessageBox ("Get Poke Unsuccessful");
+ x0 F# P6 o3 p6 ~" B* m, Z                return;
                }
7 ?. \1 Y; }5 l/ C9 L
1 d+ a$ V0 c0 k* L- z8 m  v, c1 S) Y/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
0 M7 a5 D  L) Q5 @# F+ G       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
4 ]2 I! }$ Q7 O( v; a        pokeVariant[0].vt                 = VT_BSTR;
. I8 I* r" Y6 ~) M' g        pokeVariant[0].bstrVal         = valueStr;
7 c" e6 a' \7 D+ W; P5 ~
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
; `9 X$ p  N. d8 F. g5 l        VariantInit(&pokeVariant[1]);
( y- J  c+ U! w1 f        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
$ ~- l- l& T9 s
          topicStr                                 = SysAllocString((WCHAR *) L"system");
4 ?+ u9 Q( V/ c9 s4 [        VariantInit(&pokeVariant[2]);
; {8 b4 p5 Z" }4 K" l- o, a! P        pokeVariant[2].vt                 = VT_BSTR;
# x3 r0 N' Y* G% W* B7 T! s$ E        pokeVariant[2].bstrVal         = topicStr;

( ~) G, ?; S- Y0 J' E5 }4 P7 N; D//        Set the DISPPARAMS structure that holds the variant.

- E2 D+ ]3 }+ k0 t        dp.rgvarg                                         = pokeVariant;
, I) Y) A& Z  p        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
$ j' [$ o: w: C/ ~% X. ?. q% @  ]
//        Call IDispatch::Invoke()
7 _. m+ e3 b9 V* M3 s. k/ g8 t- y
7 p7 w1 k9 j. ^- ]        hr = m_pDisp->Invoke(
# N* z3 p3 N7 S( h7 `                pokeID,
+ L/ x' M, n' M                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
0 ?) p7 Y( W0 F                &dp,
8 Y9 J0 }; h" W* f! E1 D1 R                NULL,
5 F$ _5 |# g9 o. T& O5 I7 I                &ei,
' H! i2 Q1 c7 U# r                &uiErr);

        SysFreeString(topicStr);
" g8 B% r  n6 j/ C        SysFreeString(itemStr);
4 _. E% a  G% d3 B/ b        SysFreeString(valueStr);
/ S5 m4 b( d9 ]& C* r0 H1 o
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
: s' E5 E& N" A. Q$ I& F此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

! K0 k8 E2 h8 M0 O9 _8 c0 g. h
8 t7 Y) @% K/ ]4 C5 M7 r2.这是request的程序
//  Request a value from Extend
# L* a7 z% T# a//
//        Initialize the variant that will hold the BSTR.  Set the variant's
, \0 ~9 t2 g0 J" @//        type flag to indicate the fact that this variant holds a BSTR. Place the
% u+ ?+ X. \1 M$ n4 B5 Q8 u3 p4 H//        BSTR into the variant structure.

; @. }$ p; q+ T        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
+ r; T' ]- y1 z* P' }$ H8 V       
9 p' d9 ~9 s* |# t: j- n$ |& K         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
+ h$ ]' C$ o( G* m: ^' r        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
/ x' m; T6 I* a$ ^" \! }- b( O        requestVariant[1].bstrVal         = topicStr;
8 Y$ ~  w. b( d! o' L% A' `
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
9 ^5 O, k& Y! ^        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
0 @# k2 L0 z& V' c  B        dp2.cNamedArgs                                 = 0;
2 u. k5 l7 s7 S1 e1 P
: L+ |1 K) f; C, ~. x6 O* E; s7 \4 T         var.vt = VT_EMPTY;
( D. t$ |6 o, b
//        Call IDispatch::Invoke()
9 X- h1 k& `$ I( p( J8 D- m( o
9 N3 {! i& P1 R1 k        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
% R8 ]$ s" [, q+ V0 z" l                &dp2,
                &var,
                &ei,
7 C  r' I0 k* u8 P& N, l                &uiErr);
" M1 E: p- u4 \6 e
        SysFreeString(topicStr);
        SysFreeString(itemStr);
% i; R$ S! o" ^- r( L. h* \请问该程序是获得extend里面的哪个值？
; g5 o# X+ _7 D. W* e如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？