c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
2 T4 L( n1 c$ ^  X1 i! J                IID_NULL,                                // reserved
- c$ j1 U: @+ B1 U. a                &Name,                                        // Array of names to get IDs for
1 [: T+ b$ T' T% c# a9 H                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
" d, {8 W) ^: B& _) ~4 B                &pokeID);                                // Array of IDs to fill on output
) V  b  o" D& T) h4 K                       
        if (hr)
                {
0 ^0 ?* ?, D/ Y% n' ~& A4 P                MessageBox ("Get Poke Unsuccessful");
                return;
  c# @. s2 [; h                }
( h1 N. N2 B" `% F. A' d
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
/ Z% v9 u' s% h3 y4 e& t3 s0 l       
, B* K) t+ B7 p* m; }# ]# T         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
  c! z8 w7 j1 B: _! j7 p        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
0 S* M- f' p4 l! O
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
' p. X1 e' J' C7 [, P' q/ R( J+ U0 F        VariantInit(&pokeVariant[1]);
* a9 x2 O5 [/ _) C4 v4 q        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
+ z1 z1 T3 g% E# R' k$ M( G6 k
! [( Q- i) }4 K" W. f          topicStr                                 = SysAllocString((WCHAR *) L"system");
$ u+ }/ E; C; B2 W$ q  g        VariantInit(&pokeVariant[2]);
2 m: S8 C9 u; O  d" B, c        pokeVariant[2].vt                 = VT_BSTR;
" @- s, r* z8 ?3 S2 _        pokeVariant[2].bstrVal         = topicStr;
) _6 x3 P$ a' e: w: w
( H% R9 Q  F# A//        Set the DISPPARAMS structure that holds the variant.

) d0 H. }  ]! ?        dp.rgvarg                                         = pokeVariant;
) C; |3 x5 F& y' a: Q" t6 w        dp.cArgs                                         = 3;
' {/ y/ z" w0 m+ a3 c        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
/ q, R- O3 c( }( C- R* b
1 a; @" P, n9 n. ]3 L, Q1 s//        Call IDispatch::Invoke()
/ }$ |& g9 L0 X! @/ X% _7 v
9 }+ E% \9 W6 l        hr = m_pDisp->Invoke(
                pokeID,
: y4 y: x  @' [, Q                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
9 J# {& i) `5 c9 W( L                DISPATCH_METHOD,
                &dp,
                NULL,
5 M8 ?: l& j- B  M                &ei,
                &uiErr);
: {# k" c! V3 h, }% |, y
5 C7 O, Z$ R, }' v1 ^1 A        SysFreeString(topicStr);
        SysFreeString(itemStr);
: M- D3 Q, I3 X8 m        SysFreeString(valueStr);
. ~) c" Z; b/ R2 h
5 {& i: A  v! s现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
& G8 k$ f8 H0 z此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

3 t: U: W' K; m2 X4 X
' h5 h/ U/ {" E; d$ c# Z2.这是request的程序
" Z/ M7 H: |. |+ t8 S0 }//  Request a value from Extend
//
' L0 [; G3 @! L% ~$ g9 N//        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
" C. ]  m3 }  b& G6 w& i//        BSTR into the variant structure.
9 o' E6 S& y7 P8 j( l6 m$ \, y
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 Z: H; Y! g$ c4 T1 u" l        VariantInit(&requestVariant[0]);
* l/ y; U3 A5 T/ J        requestVariant[0].vt                 = VT_BSTR;
" V9 k" I6 B4 t) F3 V% c; `        requestVariant[0].bstrVal         = itemStr;
- u( _& v) U  Q/ P* S. l
          topicStr                                         = SysAllocString((WCHAR *) L"system");
  r6 |8 A) y) r! ^. @& X        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
. @$ e! I! b5 ^. y# A" ~0 Q        requestVariant[1].bstrVal         = topicStr;
% l/ b3 d! A/ ]" ~& L
1 R+ `% V& m6 F//        Set the DISPPARAMS structure that holds the variant.
4 o9 P4 _' K( A& R
        dp2.rgvarg                                         = requestVariant;
& \5 P! ?1 k) E# g. w        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
+ T8 i. ^1 L& {5 w- v9 I        dp2.cNamedArgs                                 = 0;
, P/ S# t$ Q/ f$ P% y
6 P) n/ L/ ~. c         var.vt = VT_EMPTY;
, Y# {* C* ^$ d& h4 F
//        Call IDispatch::Invoke()
- E# W  o$ H" c
( s% z) Z1 o" t7 M5 `0 S3 H* U7 y. ?( j) f        hr = m_pDisp->Invoke(
                requestID,
1 q4 E. @: [/ F& _                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
# r* E: R! a( k! Q, J7 @9 Z                &dp2,
                &var,
                &ei,
7 Q) `, X' U: ^+ L' v, w                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
. x9 `( H! ]$ }" A) D2 v如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？