c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
/ V  U+ Y5 z! G' M8 BName = (WCHAR *) L"Poke";
0 \$ |7 U5 y* O2 [3 ]( b& u: m( y) s# e                
$ {5 t  Y2 k5 {2 e$ w        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
! u  d2 A0 O$ b! r: N                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
* S2 B/ P" m9 D( Z( r6 X  S) U                LOCALE_SYSTEM_DEFAULT,        // System locale
; Z, b# ]6 X$ f& x9 {, _8 Y$ d                &pokeID);                                // Array of IDs to fill on output
9 G! Q$ s: h1 j8 Y7 C/ \                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
$ v5 u9 L; q5 W" B/ P& T( S                return;
                }
5 u* [3 S1 |1 d& i
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
4 ?. }; |: z. H$ n0 J8 k- [( q         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

* a, Q. ~8 W5 J( R         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
" M8 ]. K2 l: s! d& O        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
! W$ G8 N: B( H
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

) U7 Y/ T1 d: c* E5 \# C. e! v! D//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
7 R" M9 p9 A$ H$ e        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
) K/ B. \) J; C& P3 A7 Y5 i; l
, W# \, @' D: d- ?% H/ J1 g1 M- ?//        Call IDispatch::Invoke()

- ]  v' v2 f4 x, @* d, g        hr = m_pDisp->Invoke(
! |3 l( B0 @# u' z8 F  I                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
% @) V% `0 T) i  a& c+ X                DISPATCH_METHOD,
) G4 W9 b% n, k* B  i. }                &dp,
# d5 L4 {$ a; ?5 x/ T                NULL,
/ A3 }  ]$ w( ]! F                &ei,
                &uiErr);

3 v9 C- g5 p# K- [        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
+ E+ I  x! t0 x2 D1 ?2 u  A
3 W* _, k$ r0 Z2 S: x现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
7 @! {6 P& I! o

2.这是request的程序
//  Request a value from Extend
, H5 Y' V3 g% b7 g& K" Q, v% b//
//        Initialize the variant that will hold the BSTR.  Set the variant's
# e( W# P- E( H: I7 Z4 t' ^) D//        type flag to indicate the fact that this variant holds a BSTR. Place the
2 n) u' l3 Y! f( R6 ~; O//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
" j9 g1 r3 i7 @9 u6 Q3 K5 |         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
1 Q, c2 a" h5 P; B        requestVariant[0].vt                 = VT_BSTR;
$ x" K0 T0 \" ~/ R1 A6 o        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
7 t" b) i9 r/ I, A/ P* v# w. q2 x" N        VariantInit(&requestVariant[1]);
/ T/ @6 I. q8 n        requestVariant[1].vt                 = VT_BSTR;
0 Q' @$ }! g/ W4 x6 i; b0 [- T( q( `        requestVariant[1].bstrVal         = topicStr;
; v" s7 X7 v8 B! ^7 i. H4 Y
8 d# p2 D  c4 }. `' b. _//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
+ K/ h! M& |# o( @( b/ r, G8 |& a        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
6 b3 j: ~0 v, N& @" }0 x8 s
" D+ G2 o& Q- p         var.vt = VT_EMPTY;

) l, q7 F1 n2 h- V1 U4 ~/ f//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
0 E' Z- @8 E8 D$ }' O' K                requestID,
  R1 J  h* `8 r( C; \                IID_NULL,
3 e2 i0 R/ m- W# v; K7 U$ F+ k* G                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
( I. N: i' x! a% [2 O& v" i                &dp2,
1 v; X5 D& @) Q- L4 T0 c                &var,
                &ei,
5 K9 P( v! H! ~, j0 a% s                &uiErr);
% b6 v& q1 u  n8 x: n3 u+ n
        SysFreeString(topicStr);
8 X5 t1 n0 N8 S( E  P! n# B9 ^* `        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？