c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
' Q, A2 o) O- v: f5 b. rName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
8 Q5 v7 E$ s( b3 Z                IID_NULL,                                // reserved
8 }* @. Q. ~9 K: ?  E+ h                &Name,                                        // Array of names to get IDs for
. l0 o2 x1 N8 [                1,                                        // # of names in the array
: a# P2 z% Z; {, P7 F) u                LOCALE_SYSTEM_DEFAULT,        // System locale
) l5 F* i- O/ s5 Z& ?. b                &pokeID);                                // Array of IDs to fill on output
" H7 D- H. P6 ^. Z( E5 N$ J                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
. Z: J" d- m" K. `! N- w6 A
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
0 M; r3 c3 H1 V/ r) F9 O& \        pokeVariant[0].bstrVal         = valueStr;

$ c9 J2 j2 Q2 @         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
! J. H% B4 {' ?# J/ ?- y        pokeVariant[1].vt                 = VT_BSTR;
3 S% N6 ^' r8 l% q2 ?/ _: P& g& g7 u        pokeVariant[1].bstrVal         = itemStr;
1 p! x& ]4 x; o# L; g5 _. S" \
) e8 U" Q# z- j6 i4 M! g/ v3 K          topicStr                                 = SysAllocString((WCHAR *) L"system");
. p' v; I4 i- g; y, {0 \' j        VariantInit(&pokeVariant[2]);
: ^) F' K1 ^% [7 m        pokeVariant[2].vt                 = VT_BSTR;
4 q# y) n, e2 C' I        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
: Y! r( W/ C7 ?: O3 ~0 W
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
6 O% ]( H: H. A( f6 o- \& ]! O/ p- f        dp.cNamedArgs                                 = 0;
5 H0 h3 E: z1 l2 x+ \3 I! c. B3 Q" e
//        Call IDispatch::Invoke()

' M& g% z6 x/ [4 w5 D3 O        hr = m_pDisp->Invoke(
                pokeID,
) \# o+ y4 I' z/ V* O" m                IID_NULL,
- S$ T5 S+ j  ]5 q* _. n                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
3 _( G: S$ ?: F! \) H5 t+ o                &dp,
                NULL,
  x7 c' m6 Y: B                &ei,
* d# O" V+ Z, X5 b4 V! \; i                &uiErr);
2 c2 \5 ^4 K- p" @! r6 l5 ]5 M
" K& h6 c1 u) q3 |; `- x* h# b$ l2 L        SysFreeString(topicStr);
7 e+ x4 \" g7 `; c        SysFreeString(itemStr);
' D  `, ]  H% X' [. a+ p        SysFreeString(valueStr);
! X/ G1 B# n3 x. i" ^9 r6 @
) {' k; E( {. k" w# }7 u现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
8 O' X+ o# I* Z此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


0 P6 \# @, u7 e2.这是request的程序
8 b) |# P+ b8 h9 s$ _6 Z$ J//  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.
4 W. c0 U+ \0 Z" l
0 O" `, b2 M) V, G; Q        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
2 A/ ?! B7 {* P) ?. R( l         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- K* }  ?- ]( M1 b2 [; F        VariantInit(&requestVariant[0]);
8 C. R% X2 d) v2 ?  o+ g        requestVariant[0].vt                 = VT_BSTR;
3 P* I. L9 m: k  R, s7 ~        requestVariant[0].bstrVal         = itemStr;
! ]5 ~" a( @4 o' ?, \
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
7 S1 i* [3 C! F9 C; d* r        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
% p2 Q; `  x2 j8 t; O9 |4 D
# L/ m& l( n" A//        Set the DISPPARAMS structure that holds the variant.
( @4 M" }8 h- J7 s  g# N
9 ]  F6 Y8 P0 u, h, [( t        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
/ _1 W4 v# d: }, J, @' r        dp2.cNamedArgs                                 = 0;
- E  U" t9 h6 F5 h5 j
3 d7 U- L/ m# C5 Q. t         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
# q' |. t7 ~' `2 X: a
! ^& h( u8 t; a. c. @- a, h        hr = m_pDisp->Invoke(
  e2 J% l$ ~$ X/ o0 s* a                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
7 d7 ?9 E5 V9 A3 i+ p                &dp2,
- K" R! b9 l3 C                &var,
6 a" E% r$ @' E- \+ @                &ei,
/ z4 E$ l: a' _! u* l                &uiErr);

9 P% r, H. g( t2 m3 W3 m/ e' n. ^        SysFreeString(topicStr);
        SysFreeString(itemStr);
* n' W8 J' H) @& j- M请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？