c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
9 W7 @- A$ F- o* HName = (WCHAR *) L"Poke";
3 x5 f5 |3 K; i$ n9 [- y- G                
# e! l' y4 L( G1 T( `' W        hr = m_pDisp->GetIDsOfNames (
( _9 @4 C: Z% c) h# W! R4 x                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
  X% a& n4 j& {1 y$ f$ S! e                &pokeID);                                // Array of IDs to fill on output
                       
  f$ V9 I) w& a( |, f9 r$ o8 h        if (hr)
                {
0 q$ C4 V- e# h* D$ B                MessageBox ("Get Poke Unsuccessful");
                return;
/ H2 [5 D1 C- d% c9 _  I                }
8 h1 }5 C/ v" J2 W3 ~: w  f4 \
/ k& A3 `1 E4 C" h" s& ~/**************************传递数据给extend**************************************/
1 I1 E; p$ R+ J* L: i: q6 g8 [        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
0 `2 ^) E7 |8 ?5 ]) N# j& t        VariantInit(&pokeVariant[0]);
7 c) y% E" p4 h/ ^0 T; l( T        pokeVariant[0].vt                 = VT_BSTR;
% N- I, S3 g& U1 {' n; V( q: E8 X        pokeVariant[0].bstrVal         = valueStr;
. f- }& B  ^" |; }4 k
! Y" q3 U, K$ q8 c% [# g+ [         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: I: ?* n( k' a; m' P% M6 U        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
3 i: l: \: c4 _$ z: Y
, ~) g+ D  w+ Z9 a          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
2 c- A* ^6 b+ }+ L- B$ ]        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
* W: I, ^( [# A8 u/ a8 \
8 h' R. F- O" ?7 n+ d" t! B//        Set the DISPPARAMS structure that holds the variant.
" E( X. M/ ^. f
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
) G- ^, v! c: S' e$ {        dp.rgdispidNamedArgs                 = NULL;
# C* I$ ~) G" R) L7 }# ^        dp.cNamedArgs                                 = 0;
+ A- I& Z: w% {7 F. F3 `' P4 E9 q
//        Call IDispatch::Invoke()
9 r; ^6 R& L5 j0 {: b8 H8 R
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
4 W1 ~  N$ l3 I8 |+ ~: Q4 t                &dp,
9 V' G# N2 d7 K                NULL,
2 t( `8 E$ L' z* ]8 s; `7 `                &ei,
                &uiErr);

        SysFreeString(topicStr);
$ i* b, D/ E/ `4 C9 H- ^        SysFreeString(itemStr);
! D2 a9 W. h0 h( N% U        SysFreeString(valueStr);
) ~& U, T$ r& C; A
1 J  e3 }. z& @1 m. Z' b现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
& {, f, O: M( v
9 C9 g% q! s" N+ z; p% ]
2.这是request的程序
//  Request a value from Extend
6 @) J$ `9 U/ O% I//
( A" l! o9 J' I3 n9 i//        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.
' p& P) W/ p" Y
6 D$ j2 e2 i; ^7 T9 q( N- |7 q% I        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 f  f' K9 d5 ?& c) k3 [       
& _. h9 r. @4 k; Q6 B         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( `  {: N% U3 {4 g# O        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
% \4 `8 X% T0 [; j" h        VariantInit(&requestVariant[1]);
6 |0 ~0 W8 X- r+ h. _+ x        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
% h/ W; S7 \6 [; x9 x8 i
; m" B9 b7 }4 U* B  u//        Set the DISPPARAMS structure that holds the variant.
( C; Z( z/ b% R& @+ K( X5 _: q
- Y+ R. t' l" W: l8 ?3 P        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
) y% Y% Q, |$ w- b        dp2.rgdispidNamedArgs                 = NULL;
( F* z( A$ h) L: v) t        dp2.cNamedArgs                                 = 0;

  R0 N0 p8 W3 L$ Z         var.vt = VT_EMPTY;

$ O  @; m! |2 M1 p//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
  Q. x: k& d; [                requestID,
                IID_NULL,
9 p/ c1 U' b# ?3 A6 _8 }                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
/ |9 B: C( z: {. ^                &var,
                &ei,
; \  @. M9 F* O8 d4 U* M( _                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
) k+ X) b  B1 h: L  X! Q; o* f# g如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？