c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
- Z" l, `: z# o# C3 L! B) w        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
; w5 V3 d# w5 P1 U- J                1,                                        // # of names in the array
! L: t( X( W  O6 \                LOCALE_SYSTEM_DEFAULT,        // System locale
5 {  c* O/ |1 \1 p                &pokeID);                                // Array of IDs to fill on output
                       
' V. ]! K3 s1 F) U' `$ Z        if (hr)
# r, Q7 E; Y. R3 o( k                {
' n! O6 z4 Y) p3 m1 a1 S/ U( k1 w) T                MessageBox ("Get Poke Unsuccessful");
1 D4 t  i, N6 r/ L3 `" [7 U9 e1 x                return;
                }
; C; x; b. w0 O/ }7 @4 K
/**************************传递数据给extend**************************************/
: ~, r( V- e8 c5 D% a        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
( P9 V* q1 s! T2 C0 B         valueStr                                 = SysAllocString((WCHAR *) L"1232");
1 t9 I  |2 p! d  N' R& T  s/ l, w        VariantInit(&pokeVariant[0]);
, y- ]! H6 C1 R- K3 k* X' O3 V        pokeVariant[0].vt                 = VT_BSTR;
/ c7 W/ G* L8 v* w        pokeVariant[0].bstrVal         = valueStr;
7 X. n; n- q, Z- G$ ~  K$ \
. @7 W9 C4 \3 }2 q/ I& g8 C         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
: E  I- `# j: F8 ^) U3 Q6 A+ a; b8 t- x/ m* D        pokeVariant[2].vt                 = VT_BSTR;
1 t& @0 @5 z- D        pokeVariant[2].bstrVal         = topicStr;

- F  b6 g# M/ j9 n' l//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
# }) a6 |( |  }$ c        dp.rgdispidNamedArgs                 = NULL;
' F! H3 U6 l2 \% V( v: y        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

1 r0 ~" c3 v1 q+ ]        hr = m_pDisp->Invoke(
                pokeID,
: V* Q2 M9 h' o) D6 C                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
( o6 B9 X4 A- @' o$ F* T                DISPATCH_METHOD,
, U) m. i& [1 M                &dp,
                NULL,
                &ei,
                &uiErr);

' a$ C$ E# Q$ k# o4 S- M$ `2 [        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
8 {8 y7 |4 T$ }# b# M# r' y
* S; c1 ]* ?, H: G5 v1 ]现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

5 A; m; z) ^  s# \$ M8 S& [
5 S! n( S$ z+ h# N- H/ Z& J  n2.这是request的程序
//  Request a value from Extend
//
//        Initialize the variant that will hold the BSTR.  Set the variant's
3 f% Q+ q4 c5 I* J- m5 Q! I//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 a/ Z% `0 L1 q- b2 p        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
$ R4 ^/ g* k5 T+ i/ R- F
2 ]" o2 h! N$ H* u          topicStr                                         = SysAllocString((WCHAR *) L"system");
9 _) P+ W7 F" h2 w        VariantInit(&requestVariant[1]);
9 F' U$ ~, I6 d8 `        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
! N$ b( z- F- T+ H
        dp2.rgvarg                                         = requestVariant;
% W! r6 P$ S, P3 E0 X2 h        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
- s; G* w7 s% A: w( C( W8 s        dp2.cNamedArgs                                 = 0;
/ a! e4 _* _) ^) j/ @# L
        var.vt = VT_EMPTY;
, `. W0 g% t5 H
//        Call IDispatch::Invoke()
% g2 n6 x& M' J: p: z  p! T
/ k! J4 |# z; [7 ?9 H: r/ T3 p        hr = m_pDisp->Invoke(
* i: P: {& ~4 ?. p, z                requestID,
1 ]9 }# y3 s# n; @) b  `9 |9 e                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
3 Z" p" D. E! C6 @                DISPATCH_METHOD,
" G+ |; N' d1 f0 o6 F. ]4 m                &dp2,
; A) a, d" V7 m( S  E- {4 d! k                &var,
                &ei,
                &uiErr);
/ L9 Q% O. n) T4 ?- Q
        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
: _2 ~, u. t4 Q1 A" S  b如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？