c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
2 R# d- l& }8 ?  b5 Y0 d$ T  q  d0 Z        hr = m_pDisp->GetIDsOfNames (
3 Z/ q  h7 l# n' K                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
9 ]  B* ]" }7 `6 g( }0 [- }; z" d                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
/ U7 ?8 ~) ?9 z" A                &pokeID);                                // Array of IDs to fill on output
% r: `8 i' T$ U                       
0 u- F( V; I2 f& R9 m        if (hr)
( j6 v/ L( F6 ]9 ?1 m& X                {
0 @4 {- T! `* ?/ m2 a                MessageBox ("Get Poke Unsuccessful");
6 a5 G& j- Q+ `                return;
                }
# U1 ?4 @# o3 G- t
" e  U* Y( X! u6 F, E5 H/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
& ]  x$ C. U/ p3 g, ^4 ~6 W# R       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
  t; r5 @( y8 w        pokeVariant[0].bstrVal         = valueStr;
7 u4 M: t" H2 v$ ]8 d
- O/ d1 q" d4 L1 q         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# l% O2 |6 ]) h& k5 v        VariantInit(&pokeVariant[1]);
. K6 P) z$ ^1 p5 t( h8 }5 m        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
5 {$ ^/ D/ D( ]4 v/ a3 C
4 I: G2 F# z6 Z/ }8 U8 \4 \5 z1 Z          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
5 a. P' t- d6 i3 T        pokeVariant[2].vt                 = VT_BSTR;
/ i3 j9 y$ K0 Z0 b# }        pokeVariant[2].bstrVal         = topicStr;
' v; V! a) a- o0 F. x
/ t3 O' i6 ], h: ]//        Set the DISPPARAMS structure that holds the variant.
! R/ O; I1 K% J: Z8 l  J
        dp.rgvarg                                         = pokeVariant;
0 @" s* J" M0 |# x$ V- b( W        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
/ G9 ]% l. x; \! y: V8 x0 c6 G        dp.cNamedArgs                                 = 0;
! ]+ h& n7 [) A) K/ o, n( O
6 x( c0 ^+ t, ]( D8 P. ]//        Call IDispatch::Invoke()
! A- G  r0 Z( j7 q
. M0 p9 n  w" n  D2 }* J6 G        hr = m_pDisp->Invoke(
' \/ n& \1 H% P  ^; }! a1 q                pokeID,
                IID_NULL,
- b# G7 S9 A3 T, m) c3 T$ L) ]" @                LOCALE_SYSTEM_DEFAULT,
" j- g5 P! g5 E- \                DISPATCH_METHOD,
                &dp,
5 _7 x1 S% T3 F, E2 q+ T4 d" [                NULL,
8 T. ?7 e8 A, J) g0 @+ @                &ei,
                &uiErr);

) X4 |+ @- X8 l        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
- B5 x  S3 t; G& f  p
0 i# K$ r5 r2 f  V6 q( x. N, q6 f现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
( J2 `. w1 m, [. C4 v4 T4 t此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

' P' A& R$ Q; M, r4 F% `
2.这是request的程序
1 A. u: J, X1 G//  Request a value from Extend
//
" J5 E. x4 W* U7 |2 S2 I//        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.
% v: w9 r' ?" s+ ?5 i3 O
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 C; F5 ]* ?# S2 O& t% B       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# W* `; K: v3 `* n        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
$ _& i( {1 ?, K( D# I6 G; R
; P* m7 q* A7 {5 a% q7 d          topicStr                                         = SysAllocString((WCHAR *) L"system");
+ ~8 d2 O7 [, [8 G: @        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
3 T- F" H* ], h& {( r- k! u  \        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
+ e) F. D2 k4 ]! J1 {2 ?        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

3 S5 W$ I% t) N) H         var.vt = VT_EMPTY;
. S' R* Q3 z! g& m6 L8 l% r
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
% j, ]6 O4 {. c: h. v0 R' F                requestID,
6 j3 c9 A4 N2 Q* }/ C                IID_NULL,
) ^% r5 L! Z9 i3 J6 J7 ]; [8 E                LOCALE_SYSTEM_DEFAULT,
6 }+ G; S! k& X2 k                DISPATCH_METHOD,
2 E. ^' ?4 v7 B+ `0 U! V3 Y                &dp2,
) t# ^8 J$ s: U' y* x7 J- w                &var,
                &ei,
                &uiErr);

& z& }8 w! z* G9 A" r0 s) t; D        SysFreeString(topicStr);
7 k* o# l  f# I0 T+ H$ l$ N$ _        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？