c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
- v9 s# Y, ^9 v; ]Name = (WCHAR *) L"Poke";
+ f5 H8 n& H, ^% a  Z                
& F- l/ m4 D5 s# v+ O7 x0 l        hr = m_pDisp->GetIDsOfNames (
- M% S* O+ S0 T; g0 e5 f: z% _  J                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
+ W. c7 |& P" D  N1 B                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
( n# I( X* ^! P                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
  r/ B2 c7 `8 V                {
                MessageBox ("Get Poke Unsuccessful");
                return;
$ H9 G: [* z) K! Z: P% ]  d; \                }
  `) g. ?. o. S9 G6 N
. F9 `7 N! D# b6 T' b! i* |/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
  \: q, y: ~# Q& r% x8 B/ A         valueStr                                 = SysAllocString((WCHAR *) L"1232");
/ q% U3 |1 D2 V" ?. \* q( `        VariantInit(&pokeVariant[0]);
) |4 [3 m2 [! |  Z& g: i* `: V4 F8 j" H3 d        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
  J5 O/ m# q0 A3 X3 T6 I9 x
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
4 L* h; T* G& Q% Z        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

( F' U( S$ }' p( R$ o4 n9 `          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
6 K( G, x5 O9 c+ w( J        pokeVariant[2].vt                 = VT_BSTR;
! _# e6 l" z8 x7 @5 I        pokeVariant[2].bstrVal         = topicStr;
4 Q/ O* c, S! U: s
//        Set the DISPPARAMS structure that holds the variant.
4 B2 I& C" }: c# x
0 E0 P6 J* w" o' g0 {* @  r5 r' W        dp.rgvarg                                         = pokeVariant;
. C5 V+ r1 ]8 T+ b6 y( V        dp.cArgs                                         = 3;
. z0 w. [6 h3 q9 C5 E        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

, }/ k8 U/ J5 Z. }//        Call IDispatch::Invoke()
' b8 u3 @8 Q- d. Q1 ?
3 m, [0 F, S% r& d  W$ R6 @        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
2 A& E3 D, i5 i1 I' r+ f( b                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
5 [# Q9 N  e0 g# n& c# c                &dp,
2 I) m8 E( |/ z) U' j$ a: {, K                NULL,
2 T) G6 {0 q1 \/ m. N                &ei,
                &uiErr);
* _1 s) A3 B9 j8 p* G
        SysFreeString(topicStr);
0 M5 e0 G% ^, A: C9 H        SysFreeString(itemStr);
3 [. D" g) c  ^1 Q( ]7 X9 {# w- K        SysFreeString(valueStr);
) n- s% g/ b. h; }
# G& Y5 ~- ^9 w# g4 H$ a现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
' `8 B; u% b+ z; n+ O此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

0 z0 U' H6 X) j  v6 w+ v& m9 B
. I+ n) s& h% }2.这是request的程序
//  Request a value from Extend
. M% T! X3 d1 w- O; j% Q, t//
/ k& W( [7 f' N# I0 \//        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.
5 L7 \5 J6 G6 {5 G6 a
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 Z0 v! O- L! J9 K# j3 Z       
6 q9 M/ y. N8 N! i0 U, t         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ l3 _3 I0 I8 \4 h3 {        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
, U. N5 x+ Y* X( Y4 D7 `6 x% d, f! ~        requestVariant[0].bstrVal         = itemStr;

5 T" j2 p, q! d1 Y) G' H6 L          topicStr                                         = SysAllocString((WCHAR *) L"system");
+ ?# K7 [( \2 R  B; W- o+ G        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
/ X+ L  M5 b3 B2 `4 d# @        requestVariant[1].bstrVal         = topicStr;
  }" q+ `$ S& u' N
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
$ j, J- s! _% y$ [        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

# q$ G" m- ~  s1 I! s4 i- a        hr = m_pDisp->Invoke(
: R3 S' F0 j: n1 D& I                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
) O5 O( B. U  ?# u0 _6 N                DISPATCH_METHOD,
* i4 a7 O6 e, }/ z                &dp2,
$ l; A; P  R# s* `1 q# p                &var,
; o% X" {) k) L# k4 V; x                &ei,
; y7 o, w: y$ B                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
! O+ c! ]3 f$ _1 S% W如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？