c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
; u. o8 z/ V: m                
! I% M7 o" Q) {' a; {  m        hr = m_pDisp->GetIDsOfNames (
: B& P/ z8 ^, k5 z( \- i0 ]                IID_NULL,                                // reserved
2 m0 O3 A' P  x9 h8 c# U                &Name,                                        // Array of names to get IDs for
! p, q+ L- @% z+ ?# p, I5 \) @                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
; n& |# r" X2 I0 ]! }* d5 K                &pokeID);                                // Array of IDs to fill on output
# W, c# d( K- k7 `: u                       
, ?  j+ V- G4 @) J% u        if (hr)
; ?9 j9 T6 [' r+ ]6 ]' D  W                {
8 S0 k$ I* B2 a7 c* Q9 n% d# G3 i                MessageBox ("Get Poke Unsuccessful");
                return;
8 n! n' a0 r# r                }
) T6 z9 E2 K; T" B0 E
/**************************传递数据给extend**************************************/
7 B/ A$ o* v, A. F- {" v7 j7 k. v        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
# C4 u  U8 O2 ]       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
. _# f8 ^$ O8 z! @        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
4 `: O2 m& s# b6 |' s5 F        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
: p2 ^% A/ T& E; v$ A" h% N. Y! v        pokeVariant[1].bstrVal         = itemStr;
, A; }; Z' d# U1 |/ g% w2 ~
          topicStr                                 = SysAllocString((WCHAR *) L"system");
& K. P5 b  }% L7 _' I- Y        VariantInit(&pokeVariant[2]);
0 F" Q0 l/ i5 A# r1 G9 R1 X/ b( }        pokeVariant[2].vt                 = VT_BSTR;
' h6 \: H$ r8 E: l        pokeVariant[2].bstrVal         = topicStr;
8 p0 O4 o0 Q4 d. [  [8 A1 o
//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
1 Y2 c" ~! F0 K        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
6 c8 o1 o! e5 N+ |; W2 v& x( S7 J
, \  p( Q( ^6 h2 S/ h% d//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
4 \2 _2 y$ K$ G# Y6 U. P                pokeID,
4 }+ K0 B0 |9 y' M! ?6 B& b                IID_NULL,
, ^8 g8 J8 }- S7 g0 X( ]% {                LOCALE_SYSTEM_DEFAULT,
  C8 }( |8 f& a8 t6 }6 E                DISPATCH_METHOD,
                &dp,
                NULL,
& v2 C7 z4 H6 @  a! A+ A                &ei,
  z9 ^$ J/ O/ t0 U                &uiErr);
/ V$ i) ]  M/ e; w$ D
8 b  a* o9 \' n# I* ?        SysFreeString(topicStr);
& l/ n: Z' g- y% M6 @* q2 ?) R        SysFreeString(itemStr);
        SysFreeString(valueStr);
+ f7 T9 x5 u3 g$ L; {3 z
5 |  \7 B* X( i# m7 F现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
, Q; i2 T8 H4 |6 T

9 h: u- f6 I# r. B8 I7 a2.这是request的程序
( S- a0 d3 Z  C5 G  @. [//  Request a value from Extend
//
/ L/ V. E/ |. I) j7 U2 `: b//        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
1 R: l% C3 C% G//        BSTR into the variant structure.
8 C$ T+ U' O4 ]% i
$ ^! d% }7 B6 Y3 H, I; F. {        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
& B* H$ ^' @, m* Y& w         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: g& ^* O6 v  S* |  `        VariantInit(&requestVariant[0]);
4 g6 ~0 S; ~' ]* t' \        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
6 d# T; B; Z/ A5 ]
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

: Q' f- j4 v# F        dp2.rgvarg                                         = requestVariant;
- V# H: V9 W0 y/ X- `        dp2.cArgs                                         = 2;
/ A. \4 \% F6 j1 M; U* o        dp2.rgdispidNamedArgs                 = NULL;
- D* j* o" \( ?% v9 A        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

3 M  A! [2 ^& B//        Call IDispatch::Invoke()
8 w, j9 X& L# ~) _% v6 j
9 V! |7 i+ S: s9 c8 L        hr = m_pDisp->Invoke(
& X# {3 X5 }" Q$ r$ j                requestID,
! \: d8 n0 g" I. f9 }                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
6 u1 L+ ?: D3 O                DISPATCH_METHOD,
                &dp2,
                &var,
8 E" S  f- @8 x$ \                &ei,
& p% |) O9 ]4 j  m& ?+ }" h4 s                &uiErr);

" R' }  h4 h6 b$ g$ o4 q( G        SysFreeString(topicStr);
. _/ V, v0 @1 }/ `0 ~6 I- B        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？