c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
) L# g0 g  K/ T% E3 Q+ s  R+ T/ |6 b                
6 U/ U$ f- I5 B8 T9 G0 [* g        hr = m_pDisp->GetIDsOfNames (
/ C, Z! |8 I6 q* [( K; p7 Y                IID_NULL,                                // reserved
% ]. `* z* }5 B( D& i                &Name,                                        // Array of names to get IDs for
* ]/ `+ m! f3 x                1,                                        // # of names in the array
$ K. V/ X( c& K2 c' R% C! y                LOCALE_SYSTEM_DEFAULT,        // System locale
: g" g) H/ S+ @5 V7 n                &pokeID);                                // Array of IDs to fill on output
( ]$ n4 t0 n0 t- P. T                       
7 C( o) G/ i+ S6 O$ Q9 a        if (hr)
0 \8 x: C* E0 e* H3 Y, F& X                {
9 m3 R) n( g& C1 j- t$ X                MessageBox ("Get Poke Unsuccessful");
                return;
4 z- K' M; h9 x5 u                }

/**************************传递数据给extend**************************************/
6 h6 `6 q8 C) O, k! v" u1 ^        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
: r; O! H0 m/ e: U* t        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
4 e, b8 }/ d5 j0 g" L/ @; h3 ^& U        pokeVariant[0].bstrVal         = valueStr;

0 |% q) z5 t# A" t         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
+ o6 d0 z% c3 O. j5 y: E8 h& l$ o        pokeVariant[1].vt                 = VT_BSTR;
$ m# v6 x! Q% s7 r6 V        pokeVariant[1].bstrVal         = itemStr;
2 Y& S& M3 B2 y2 x; Q8 [
          topicStr                                 = SysAllocString((WCHAR *) L"system");
: k$ B. f9 b+ f# R& f& M        VariantInit(&pokeVariant[2]);
: ~5 y/ ]. |' G2 H, Q        pokeVariant[2].vt                 = VT_BSTR;
6 P/ ~2 W0 {( p- Q2 g  g2 ]        pokeVariant[2].bstrVal         = topicStr;
& E; t4 g6 }+ z$ D" y  C
//        Set the DISPPARAMS structure that holds the variant.
3 S8 N" s7 U# H# d
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
& S; b) r* n8 B1 o+ f5 M        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
* C8 t  \1 [! c3 a! a9 }
2 u6 Z/ L! _' T//        Call IDispatch::Invoke()

$ Q1 M' \! B/ _  J3 M' {1 a        hr = m_pDisp->Invoke(
                pokeID,
4 ]2 F7 Z% v. N+ B/ U! X                IID_NULL,
( a6 O2 {& z( A  u$ V$ J. C- s                LOCALE_SYSTEM_DEFAULT,
' o4 Y7 z3 t" @( H0 [                DISPATCH_METHOD,
; z/ ?5 T& c9 U' `, Y0 k' \% n3 F                &dp,
                NULL,
                &ei,
                &uiErr);
+ G( h+ u/ T! j
3 S( j. m# W, Q$ {7 z  y7 t        SysFreeString(topicStr);
( P9 [6 k5 ?; f- X  W+ O        SysFreeString(itemStr);
2 {( f3 v7 [7 N- m) e5 P  v        SysFreeString(valueStr);
8 g$ f& \9 S' Z+ p" B' r6 I
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

, x. V1 Q$ N+ _4 W
, B1 u$ K! K/ L$ s2.这是request的程序
, w* w" J4 x3 Y3 Q, i( G2 l3 h: J//  Request a value from Extend
/ {- D! b! @1 {& K1 v0 c0 K0 D+ H//
//        Initialize the variant that will hold the BSTR.  Set the variant's
6 v9 h& B) Q4 C: p  X8 P$ z* w) ^//        type flag to indicate the fact that this variant holds a BSTR. Place the
( L' g  G/ p3 u//        BSTR into the variant structure.
- {9 p* L7 s! T" y7 ]0 r/ `
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# a0 Y/ I, x4 T9 D        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
' m. d, v0 n+ A# P4 O. y2 b        requestVariant[0].bstrVal         = itemStr;
; u+ |4 X3 {) Z) B  Q$ g3 E0 h+ h2 k. n
) j! X# J  f/ P- h4 g          topicStr                                         = SysAllocString((WCHAR *) L"system");
; a, G( h3 I0 c0 o7 y        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
  ~  d: m! C) j
! q: l9 `3 C4 i1 T4 F! A' S//        Set the DISPPARAMS structure that holds the variant.
1 |& o! K# a1 P% H9 R$ ?8 J
9 h, G- u! J. x2 d/ p4 b  [        dp2.rgvarg                                         = requestVariant;
. v) L3 {7 ]& L$ s  D5 `: a* q        dp2.cArgs                                         = 2;
) b7 q8 g7 }* z        dp2.rgdispidNamedArgs                 = NULL;
; ~  [$ _5 G5 t) o4 P        dp2.cNamedArgs                                 = 0;
+ j* k) E& l# P( _9 h# r2 o
        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
7 z5 B% ]0 f0 U3 |4 f. A                requestID,
                IID_NULL,
3 Q# c7 T" v& c" y                LOCALE_SYSTEM_DEFAULT,
$ i# E" p5 ?# L9 c* m# {! y                DISPATCH_METHOD,
, Y0 }4 u! W2 B  c, U                &dp2,
# E) n7 r2 O) C$ G                &var,
) v9 r7 w' b9 u7 p; Q+ V                &ei,
* q$ {- M4 g* M                &uiErr);
7 w3 B0 O( w' O8 J; c4 K2 {
# p/ X) M0 C! N9 o- U        SysFreeString(topicStr);
- H* I! }( I' e        SysFreeString(itemStr);
6 v5 h0 w% [* o* l- P请问该程序是获得extend里面的哪个值？
- b2 o7 L6 g* {6 C2 S/ x如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？