c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
/ Y* V9 Z1 g2 w2 {Name = (WCHAR *) L"Poke";
9 W- E5 x. o- B! W9 `; D% ~                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
0 l; y8 ^- ]) j0 w  D- Q                1,                                        // # of names in the array
: V0 a4 B6 s/ @0 r                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
" C  q$ j* k8 Q' p                return;
                }
  o' V0 b8 R+ ~9 \( |" ?
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
4 l. t+ j: O  P+ D         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
# Q, _4 G1 R3 k9 g' x. ?; ~        pokeVariant[0].vt                 = VT_BSTR;
- K: K* X, Q) e9 Q        pokeVariant[0].bstrVal         = valueStr;
5 d( L2 J9 L2 e# ~+ {2 |
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
2 @1 s( G$ u9 q* m& k$ {% p        pokeVariant[1].bstrVal         = itemStr;

8 S& D$ \  h" N* K; @# [          topicStr                                 = SysAllocString((WCHAR *) L"system");
1 x+ c, W( v9 h7 D. _/ b4 I1 v& D" V        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
& v( b6 x4 e, K4 Y1 m4 U        pokeVariant[2].bstrVal         = topicStr;
3 G6 ]# L/ j+ V" L+ H
//        Set the DISPPARAMS structure that holds the variant.

9 T7 P# y9 g# a4 b' J- f0 U        dp.rgvarg                                         = pokeVariant;
: V3 r* |& T+ V, n$ w, N        dp.cArgs                                         = 3;
8 G! |/ ^$ z% X' x& _6 U9 _. Z        dp.rgdispidNamedArgs                 = NULL;
- N$ p8 s6 w, }  w8 y- t4 y4 a4 c        dp.cNamedArgs                                 = 0;
* ?2 ~7 h( s8 o1 w. `; T
1 X3 l* \- @3 p. k! A//        Call IDispatch::Invoke()
3 N- K- T3 B$ Z. ^: C: X( c
8 C" p  C3 \% V# y0 o* d$ A% q4 K        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
* C! j6 @8 R' I' d/ w% Z                LOCALE_SYSTEM_DEFAULT,
7 ?( q: `1 j, V, J6 @5 X4 F5 z                DISPATCH_METHOD,
4 }2 h( J; }9 j% g% i" C$ v  l                &dp,
4 R# |, K! U3 H' t# m2 r. \                NULL,
' N. _( Y/ K# p! K: B7 J                &ei,
+ Z7 e1 c/ {1 B- p" ^: U* |/ i% D                &uiErr);

0 A3 r9 K' [0 _  X% }        SysFreeString(topicStr);
, c3 P4 @' f  ~0 {  H: O  B  D        SysFreeString(itemStr);
        SysFreeString(valueStr);
# v3 v3 b+ d8 \2 {! f1 Y
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
( T) e$ V: \  B4 J7 t+ j此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


# k+ `) Z/ p1 s2.这是request的程序
//  Request a value from Extend
9 @$ t7 X) u/ C* ^) |//
: z+ l. Q! ~$ e//        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.
% a' p6 A* O  N+ z" u. J
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
0 b# M6 w+ M' ^; H3 A# m         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: {' y+ m! G4 Z9 H4 t8 ?' A: t% Q0 @        VariantInit(&requestVariant[0]);
2 \3 f' Y5 C6 A  F$ n9 s6 c0 j        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
0 m( i' F2 d1 E, q
6 f9 m! f1 j1 B  P8 p          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
* H$ u7 u- n, L/ p2 p2 Z        requestVariant[1].bstrVal         = topicStr;
! ]! A" }' m. i1 I# l
//        Set the DISPPARAMS structure that holds the variant.
9 ^: Z8 j% G' U
6 Z; i" S# e3 b8 ^3 x6 m        dp2.rgvarg                                         = requestVariant;
& ^; n5 A6 A$ y9 R        dp2.cArgs                                         = 2;
( _, B9 H5 L# D        dp2.rgdispidNamedArgs                 = NULL;
% m& l! ?/ H& W1 r7 O        dp2.cNamedArgs                                 = 0;

2 @: V, I4 a9 |1 G( g- r         var.vt = VT_EMPTY;
: b/ c; a3 W7 u( x7 q' `4 _$ ]
  V4 j8 y& Q' |& f/ I( U" G//        Call IDispatch::Invoke()

' i2 H7 V. r! g1 I+ n7 ?) J        hr = m_pDisp->Invoke(
& F3 A& t+ ^; c5 \& v- I5 Y: L2 {                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
+ _+ N1 k7 W9 O7 L: O; D                &var,
" I8 ~0 q5 o+ b5 j* W/ m1 i8 d! r                &ei,
                &uiErr);
" Q% e  I1 t. Q, |  D4 Q
        SysFreeString(topicStr);
        SysFreeString(itemStr);
& d" T$ \  [' K! d% l4 i请问该程序是获得extend里面的哪个值？
! |8 |2 Q6 A) T% `/ d' Q* d如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？