c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
$ J% H# p; h& K1 RName = (WCHAR *) L"Poke";
                
" R& a5 U; @* W3 P        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
4 }7 r' G! m, ?/ K* p                &pokeID);                                // Array of IDs to fill on output
5 e; s- l, W6 X: Q6 Y3 A                       
        if (hr)
. q: \$ ^6 {% f                {
0 g1 x3 J7 n5 a  m7 v) G" z                MessageBox ("Get Poke Unsuccessful");
$ }5 M$ @" o) o; ]2 r7 {" A% J. ]3 A                return;
                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
" V- f, P, w4 I1 M/ c       
% o: h' Y" G; G3 `2 h1 Q         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
" Z( P) p# P* L% Q  K        pokeVariant[0].vt                 = VT_BSTR;
. B+ ]* n0 U* I% \0 R4 r/ j        pokeVariant[0].bstrVal         = valueStr;
/ n* }8 e! M+ j6 B9 p
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
8 Y7 g4 G+ B! Y% R        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

" R2 f. y& [: W3 ]  b- E& Q0 u* C          topicStr                                 = SysAllocString((WCHAR *) L"system");
) A6 Z  U; {" @        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
8 j& B% c& }/ l) g0 h        pokeVariant[2].bstrVal         = topicStr;
/ v+ c* w8 J6 x1 E8 f! I, k% H( b( y
//        Set the DISPPARAMS structure that holds the variant.

# ]0 ^! }. }5 }6 _        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
5 _6 }+ E1 N# g$ W+ u8 _        dp.rgdispidNamedArgs                 = NULL;
- u5 |/ {% v  |1 x7 e, v8 ?        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
3 H% {! |$ B3 k3 S0 i1 v
) r2 S+ q& T( N6 I2 `9 W3 t4 v        hr = m_pDisp->Invoke(
- ?3 Q+ z. M. A  v: O# x                pokeID,
: k% j0 l5 L- [1 b. o; [                IID_NULL,
$ \! I$ k2 F, D4 {7 X, V2 U                LOCALE_SYSTEM_DEFAULT,
( w# X; Q5 `% K- _                DISPATCH_METHOD,
0 ^# P# }6 _7 |4 }0 l5 @% Q                &dp,
; |7 v: n% q3 X+ F$ q                NULL,
                &ei,
7 t1 M1 _- ]( `: L                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
$ j& T+ n; p6 R$ U        SysFreeString(valueStr);
0 z1 P5 o/ }+ l4 H# Y, a
( c2 Y9 G# o- d& F( {! i现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
6 D0 ^2 |$ O! X7 h5 X# f( |

2.这是request的程序
9 K, x! P* N9 i: m$ q0 H  Q3 c//  Request a value from Extend
9 x0 B# K' z! M9 h//
/ Q  n9 _. T) A$ c4 c+ Y//        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
! m/ L/ X2 y% G9 ]//        BSTR into the variant structure.

  p0 K$ }  q" s( `5 c( b0 ?        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
( H% y4 x, F6 k2 O" ~        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
0 X4 j" |5 [+ W1 U        VariantInit(&requestVariant[1]);
2 B& D) u, u1 H# B( q  N        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
2 E5 q+ h5 a0 G! L6 |5 k
; G+ e6 ~0 h4 }, d; L* X9 F//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
; y/ ^7 H  ]+ O        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
- L% [  ~  T2 |1 a: u7 j$ w        dp2.cNamedArgs                                 = 0;
9 M! d+ y3 ]2 M- |
2 C1 a# F5 O& G" Z         var.vt = VT_EMPTY;
% k9 i/ ^$ k+ ~- q' p% c
* G3 I3 t% m5 G' M//        Call IDispatch::Invoke()

( f. V, s/ z0 g4 h1 d$ I        hr = m_pDisp->Invoke(
- B( F& ^3 f, ~                requestID,
1 F* ^: z- L0 A9 k0 P# z6 v                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
2 w8 c' [; F- ~# z7 f                &var,
                &ei,
+ e5 l5 p8 _; C$ }  [1 |                &uiErr);
- ^( i; _% e/ O2 G0 x
2 m; u* E) Z. h! j: s0 E/ I5 P        SysFreeString(topicStr);
: K) g# U) _! \5 P9 H- A        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？