c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
5 p" k5 t+ p) `# l, U: E2 Y. PName = (WCHAR *) L"Poke";
" B  s& {- f) ^& X" G  u                
+ E9 \* C2 R! n        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
& }' T: `0 G$ v* g$ L                1,                                        // # of names in the array
3 P& f/ D6 \( ^/ _/ u/ g                LOCALE_SYSTEM_DEFAULT,        // System locale
4 q* R* O; b% b2 n                &pokeID);                                // Array of IDs to fill on output
9 N: T0 o9 d) z8 h1 E3 _! r                       
        if (hr)
! L/ S0 ?( O4 i                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }

. p8 b  b* V" _0 L/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
: |# G* o( z5 k: x# m$ H         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
; P* R% u: [* o- A; ?        pokeVariant[0].vt                 = VT_BSTR;
8 u* I3 M8 a( c        pokeVariant[0].bstrVal         = valueStr;
; W- I& }3 `2 {- `: m
6 N& X! p5 g8 w0 w0 E         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 Q' _2 f2 V8 r; V8 S        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
, R, t% {" I& D+ [, i( d        pokeVariant[1].bstrVal         = itemStr;
% B$ A: \, |5 i0 Y7 @
          topicStr                                 = SysAllocString((WCHAR *) L"system");
+ H7 {* c2 }' ~; E* Q% |        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
) ?2 {$ S* w8 S        pokeVariant[2].bstrVal         = topicStr;
  U. f9 q+ V& C0 i8 t( [' g
6 F3 x4 O0 ]; _8 j5 W- h4 f//        Set the DISPPARAMS structure that holds the variant.
6 }4 t# F% c8 {8 o8 z7 a
        dp.rgvarg                                         = pokeVariant;
. O: B6 y: |% [4 c' Z2 P        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
6 R' U! `7 I- ^% W        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
/ q4 Y3 k2 M6 a; I1 D* X
0 _: A4 a3 T: A! J5 Y, G; j        hr = m_pDisp->Invoke(
3 D# q+ r& ]- z9 }' g" m9 C                pokeID,
  |. V) Y  K1 J5 X( {+ P                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
* u; M6 x6 s9 u6 t% |3 N. ~                DISPATCH_METHOD,
                &dp,
' ?( k3 P3 @& p# ~% m) B5 g/ ^                NULL,
                &ei,
                &uiErr);
5 t9 W* c7 J1 n$ v  J
' _' u. W' ?" ^9 [) b. |0 `        SysFreeString(topicStr);
, g& c, ^( S( V( w. k. K- G        SysFreeString(itemStr);
: O) A  F( p) F* M& E        SysFreeString(valueStr);
4 [) c( o: z. M4 m% q# e
# W, j% [  _/ d3 ]! T  X现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
- K+ w/ O  e7 i) f% d
( a& T! E0 v, f3 L
! \1 y. f0 E  Z8 f2.这是request的程序
//  Request a value from Extend
//
//        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.
/ {1 ~& k2 P( l$ Z1 n* G" w
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
- l" @& r; l* z+ S6 {, U" U       
' w0 M. F+ n- b+ `         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
/ x) x0 D9 `3 C! S4 F3 Y1 O# Q9 B        requestVariant[0].vt                 = VT_BSTR;
7 J& ?  _1 I0 l: x; w        requestVariant[0].bstrVal         = itemStr;

$ p2 \- `  W/ W. V          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
! Y; f: N9 v1 z        requestVariant[1].vt                 = VT_BSTR;
4 `0 p- [4 j0 n" c. }        requestVariant[1].bstrVal         = topicStr;

/ j" ~! c% t* a: P% ]2 F8 w//        Set the DISPPARAMS structure that holds the variant.
) u. ?$ R0 f* P  `2 X. t/ e
$ N8 [' B. m7 G4 e9 `, d3 \        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
& J: A9 u; c* e  w6 n        dp2.rgdispidNamedArgs                 = NULL;
5 a3 F1 x( N: V% Q        dp2.cNamedArgs                                 = 0;

2 {1 n1 T0 N& W: o         var.vt = VT_EMPTY;

" A* r3 f  ?- O# Z% K//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
( |3 E$ K  B! d- e5 L) t' e                requestID,
3 K# J0 Y) [# a                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
; g# f9 Q. D/ Q2 m                &dp2,
9 h+ L* L- a4 K8 ^7 r# M5 ^) I' H9 S                &var,
                &ei,
. X  R% T/ u( w5 R5 W1 `                &uiErr);

9 a9 f! |7 K! O9 s+ S        SysFreeString(topicStr);
  B* ~" I4 G- A        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
9 `5 J& z$ j  h% f& A& k" Q! q7 G如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？