c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
0 r! B" s( f: K4 \5 |Name = (WCHAR *) L"Poke";
; C; U4 b/ h3 p/ K+ L                
' W6 ]( D. [( G2 Z: f        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
! t. H4 ?& `4 W0 `( j. J. a3 X                &Name,                                        // Array of names to get IDs for
, L+ }, J& J0 T7 K                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
. {6 E/ d- ^2 A% ]1 s                }

* J' Z6 u! v# t% N0 g, K/**************************传递数据给extend**************************************/
/ O8 W. |; K- e1 z        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
* y6 z( q+ a( B$ k  x        VariantInit(&pokeVariant[0]);
7 L! U! O2 q: ?0 i0 O4 W  w        pokeVariant[0].vt                 = VT_BSTR;
% p  j9 a$ t- e& N8 w  o        pokeVariant[0].bstrVal         = valueStr;

0 V/ @/ p2 p/ y: a" x* j! \/ _         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 g* M! i( R: }2 [+ P" }/ W- k9 R        VariantInit(&pokeVariant[1]);
9 ], x' T! u6 G8 v1 [        pokeVariant[1].vt                 = VT_BSTR;
. e2 f2 d' K" ^; D1 [  S! w        pokeVariant[1].bstrVal         = itemStr;
5 F* W1 s9 ^* g+ C1 ~
/ ^2 u; C# d! t          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
; y' ?7 ^: A4 j0 K/ L) P* X' A        pokeVariant[2].bstrVal         = topicStr;

; s: D4 l/ f$ Y6 B$ H//        Set the DISPPARAMS structure that holds the variant.

3 f- @% ^; w, G! n: i( @/ Y- ?/ C        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
: b2 H/ l9 s- ?( v, L        dp.cNamedArgs                                 = 0;

& ]& ~6 ^$ g! G" J5 e4 A//        Call IDispatch::Invoke()
3 H2 `0 M- v6 B
        hr = m_pDisp->Invoke(
                pokeID,
, `# E& m& I$ @5 X                IID_NULL,
: A. e2 s8 G6 A, H1 m                LOCALE_SYSTEM_DEFAULT,
+ T9 ?  E/ v8 ]$ h, ]2 Y                DISPATCH_METHOD,
                &dp,
6 h. f: a- W9 s' w# @" v                NULL,
7 ?7 z7 i3 U$ I                &ei,
  L- b" B* V* k* r0 u8 {                &uiErr);

        SysFreeString(topicStr);
" U3 c9 M$ H' {5 g6 \7 }        SysFreeString(itemStr);
2 X$ V& Z% G, a        SysFreeString(valueStr);
3 i, `/ z" G4 }4 v$ |5 i
0 W2 A) m2 c: @3 `现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

, F1 Z  P$ P6 D" i4 C
2.这是request的程序
//  Request a value from Extend
- c5 T$ W/ ~0 i5 N# P1 Z//
6 ~2 B$ C4 \8 i3 B9 x. v( ~( q% H# y2 r//        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.
  C5 H$ _% g( j
9 R7 V6 i4 \$ r4 J( B2 Z) X        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
/ `3 W( j( X8 R4 M2 D: }       
& w' O) T9 m% Q; ^4 }         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
3 ^7 v& j1 o3 V) X        VariantInit(&requestVariant[0]);
8 Z" V' [. Y* `6 o$ u* y& E! c        requestVariant[0].vt                 = VT_BSTR;
3 c; ]- ^2 S# U  ]8 _+ H* r) {) j        requestVariant[0].bstrVal         = itemStr;
& V- x9 w" d0 p8 B7 }+ X. z
          topicStr                                         = SysAllocString((WCHAR *) L"system");
6 o4 c) ~/ m0 I3 t2 v8 x) k        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

+ A2 z( w3 i% V  m% w, O//        Set the DISPPARAMS structure that holds the variant.
" s, f, |' I( o1 U
8 T+ H4 H% [  w/ E" Z$ ?        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
) F; L0 _& V1 a+ i) y        dp2.rgdispidNamedArgs                 = NULL;
6 C) F+ r& C. `: I        dp2.cNamedArgs                                 = 0;
+ D% o# p6 p0 E1 c% o8 X
        var.vt = VT_EMPTY;

) X8 N0 `5 U1 l4 S) U  h$ l2 y$ N6 l//        Call IDispatch::Invoke()
# d$ ^1 L0 {  @. ~3 \! R  P
6 c5 h0 S  C5 p( t! q        hr = m_pDisp->Invoke(
                requestID,
: N: S. A. H8 A" G2 u                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
. w" F! E9 z2 E; b$ V4 F  w                DISPATCH_METHOD,
: r! h; I+ [2 p8 Z! U" _                &dp2,
% a7 i; N# v2 J" h- J% R$ ^9 D                &var,
                &ei,
. P! K4 W* L* k                &uiErr);

6 t( [" L; O, U) q3 v        SysFreeString(topicStr);
        SysFreeString(itemStr);
  x! O6 z+ E; w  A, a请问该程序是获得extend里面的哪个值？
1 r3 X8 V2 Y$ D2 z' p如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？