c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
7 n: N$ y& F' ]- C                
        hr = m_pDisp->GetIDsOfNames (
( r' U3 J2 ^! C. M' h) ^                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
& Q. a% d; k' n' d# d$ j& f# u/ u                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
2 P6 \" r3 E/ \- m3 C; t8 ~                return;
                }
2 u; B2 I. s4 h$ j# n8 y4 I) T$ Z
8 V7 j9 M. S0 }( T4 h- C/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
" h+ N0 ^- X" Z- G        pokeVariant[0].bstrVal         = valueStr;
7 Z2 v, n5 }, K) S' z3 T5 T5 ?
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
* b4 J( K7 l2 u0 ~4 E% U, ~, C        VariantInit(&pokeVariant[1]);
5 Z7 [: q1 I! H2 d        pokeVariant[1].vt                 = VT_BSTR;
5 J1 H. B+ `2 K1 P        pokeVariant[1].bstrVal         = itemStr;
, Y  I5 T/ I) S- S
) `& K0 j; J) T0 h          topicStr                                 = SysAllocString((WCHAR *) L"system");
1 C3 K3 g  V' x+ o$ `        VariantInit(&pokeVariant[2]);
- O  A. p" q6 n, w+ h8 v# ~" s) i- l        pokeVariant[2].vt                 = VT_BSTR;
( t) n! \$ `% i        pokeVariant[2].bstrVal         = topicStr;
' }# @& H! ^2 P: l- ]
1 I) D' Y8 R, S2 t/ Z# i//        Set the DISPPARAMS structure that holds the variant.
7 E; Z/ y7 H' G' d( s
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
7 W( ^& c  |6 W9 s2 y; e1 W7 t  b5 y        dp.cNamedArgs                                 = 0;

! l7 `# d, P& a% ~; i//        Call IDispatch::Invoke()
, ?+ v) y" ]& W8 G. I: e6 l
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
' K3 I' ?) m3 P: i% X; {7 Q, ]                LOCALE_SYSTEM_DEFAULT,
! w- w7 T5 C! s8 L. r% B                DISPATCH_METHOD,
                &dp,
9 _& d; U) n; F. k                NULL,
- O$ R" K; Q8 Z# m( l: Z0 _                &ei,
) c2 f! ]( d* [# l0 @8 i; Y                &uiErr);
& W+ [$ i! Q/ v- b/ }
9 R9 W6 B9 Y. e. ^        SysFreeString(topicStr);
* \. A- d+ j1 r        SysFreeString(itemStr);
' y2 J% @. @5 L1 }        SysFreeString(valueStr);
- ^9 O! g4 b6 L4 E2 G* v
; ]6 j+ H4 |# X9 g0 c9 ^- V现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
8 ]: `/ U/ `# T) d1 ~+ }$ m1 x此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
, f: t: ?4 v; f1 v1 q% x! I0 H/ D8 E//  Request a value from Extend
//
9 U: C; v' k2 P6 u3 M4 a/ }//        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.
% p9 K/ _8 X  t4 g  ~' R5 k8 u" q
1 y! A: T% P5 w7 R! m) {! d' i        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
& c4 u: A3 z! A+ I+ F* _         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# H2 G& M" \, Z7 K        VariantInit(&requestVariant[0]);
9 y2 w( ~" f- {# p3 H        requestVariant[0].vt                 = VT_BSTR;
: [# P' G% [1 V  ^! e; }- n        requestVariant[0].bstrVal         = itemStr;
  |3 H& b; |& Q$ O) G9 l
: _. W5 X) U; [* [/ A          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
: p$ N1 M: D; b$ [! c! z        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
  _  P( G8 R5 C" \, x. }3 |
6 P7 @# W7 \, ~2 ~' r//        Set the DISPPARAMS structure that holds the variant.
1 X' s" a) ^! G9 y$ D$ T0 I/ p
. I" T1 }/ e7 Q9 g8 h) j        dp2.rgvarg                                         = requestVariant;
+ Y2 ?% h2 t$ X* n        dp2.cArgs                                         = 2;
. e( [/ @- ]+ M7 e4 [        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
) @, [, t! D4 y' p$ U1 j
- ]/ g' D- Y/ z' C+ Q% q         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
! c% d+ x$ B: G+ ?: z
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
* M" I2 d7 q$ `/ }# ^                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
                &var,
) Y0 a% |0 ?* n9 i+ _; m; v& N                &ei,
2 G# \. L5 v  J( H0 e2 X" K! x9 l' b                &uiErr);
$ u; H9 L, x! W5 Y% h
' r' O5 b) l0 Y; n2 e, b        SysFreeString(topicStr);
! j' D- o; f) ^! Y        SysFreeString(itemStr);
! i, |# w. O  h& J; t8 }请问该程序是获得extend里面的哪个值？
% [. s( ~: x7 l$ q! ^如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？