c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
; D. ]+ f; W  a% o! f+ `Name = (WCHAR *) L"Poke";
0 X& v2 C" c: K( _3 Y                
5 j! Z+ Z& b/ a; _* z        hr = m_pDisp->GetIDsOfNames (
( }6 l" `: R/ n: K                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
+ Y. U6 g2 M# I1 s" W                1,                                        // # of names in the array
( {. @7 u. d. {& A  X/ t" r4 }8 O                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
, e6 c! b% w) l8 h        if (hr)
) |: N9 E! v1 O: [( i                {
) o* A- s% p& v: r" {                MessageBox ("Get Poke Unsuccessful");
5 J$ y, r0 ~7 v( i3 @# N                return;
+ G9 ^* ^2 G- T3 m                }

& v: a1 l# W, G, L$ h9 Q/**************************传递数据给extend**************************************/
3 Y" s+ L3 c' r( y        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
) v6 O* `7 g) f3 N4 q       
' ~4 T5 T, e& v; \         valueStr                                 = SysAllocString((WCHAR *) L"1232");
( Q8 @4 U& r5 ^, h2 Z% h+ k# u" L: v        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
7 v/ Y0 I6 t0 @- }, p0 n# O
5 H5 `9 p" _. f3 s  ^+ D7 v! i# c          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
  ~) Z/ C+ q9 u( w        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
7 v" ~3 m% N& i! g5 t# x
; t8 ]9 H) r3 X  g  {6 d# h//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
  y! X% [. x" z% ], d' [7 z6 I        dp.cArgs                                         = 3;
/ @6 o8 V& ?- b        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
$ l  B1 x) P, V$ ~+ H! F7 J
8 I: p9 g2 J0 \/ N* M  n  ?//        Call IDispatch::Invoke()
4 l6 f7 m# x, }
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
! P/ o9 x; e# S% D4 K' `% G  ]                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
) v* U9 c3 K% ^8 t) x6 z                NULL,
2 O1 E: ?( \; S5 ]                &ei,
2 B+ c" H; D) Q  w4 M% V  `! @                &uiErr);
' t8 d, H' @: V$ p
        SysFreeString(topicStr);
        SysFreeString(itemStr);
3 ^* l  F: J7 Z        SysFreeString(valueStr);
# ~0 O( T3 u0 g& ?8 @
" ~" j5 L+ B! ?6 f" B现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


+ B* I. O0 ?  }" F6 I3 d0 K! r2.这是request的程序
//  Request a value from Extend
6 B: E  Y3 T, M: q. l4 ~3 H7 d: Z$ h//
9 \7 d2 z, Y5 y. t) R5 S3 X" b* E//        Initialize the variant that will hold the BSTR.  Set the variant's
  }7 Q0 q- U& L) U9 a//        type flag to indicate the fact that this variant holds a BSTR. Place the
2 ]0 w, i  B# w! p$ ?( n//        BSTR into the variant structure.
  T: q, g9 }+ h3 C$ y, V
8 B. l3 T. A; k9 q6 Y( A  d# G2 a        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
' }2 Z& v$ O+ K         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 [2 E' D% ~+ V3 d3 ~: ]/ D9 `        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
4 [7 j- O+ T# x        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
3 \+ B7 z/ [$ G4 ^" D        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

* Y# z) B1 T. s$ f7 O//        Set the DISPPARAMS structure that holds the variant.
. \* s4 u' T' z8 F+ h* g# Z8 g
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
/ g; z2 H# Y$ u: Z# v/ t        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
: ?& u! c% O8 G6 L& V
        var.vt = VT_EMPTY;

+ D( B8 D0 j8 u: Z+ v//        Call IDispatch::Invoke()

9 C0 |, _: Z/ n/ x* F! U6 y        hr = m_pDisp->Invoke(
0 U3 }0 T* @) Q) {+ [                requestID,
                IID_NULL,
% c! g9 l2 ]; j0 t$ S# h) d, d                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
5 V! C) I$ r# _. T                &dp2,
                &var,
                &ei,
8 L3 Z3 \5 B4 o3 O6 _                &uiErr);
, Y5 O8 \$ n1 c1 W
8 C. M. N& n, d4 @2 \, X8 g3 h        SysFreeString(topicStr);
" h! u; h8 j2 S* P- g        SysFreeString(itemStr);
# Y$ b2 }) I+ H9 F请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？