c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
- W2 e- l% N# s3 _5 n. {+ JName = (WCHAR *) L"Poke";
                
1 S7 m4 M5 g$ w, g( w9 A4 {        hr = m_pDisp->GetIDsOfNames (
- T; E! y. [' q+ X" Q; w                IID_NULL,                                // reserved
. x, M( _/ s0 ?; \                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
8 x% ]4 w) V% `. ~" p# h) A! o                LOCALE_SYSTEM_DEFAULT,        // System locale
7 O+ ]/ f' B8 `) r! ~                &pokeID);                                // Array of IDs to fill on output
$ O  C8 l! S# B2 }" T                       
) {- Q. P8 E& d* N        if (hr)
0 |7 s+ ?) e# r7 b; e                {
                MessageBox ("Get Poke Unsuccessful");
* \( B* K( L/ }. |" w( A                return;
                }

/**************************传递数据给extend**************************************/
) l1 N. i! e6 b. @. e! j        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
) r" E5 S, V# i% c. w8 r" I       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
" \& O* r: _: x+ {8 `5 U- N        VariantInit(&pokeVariant[0]);
' G& a% A# z- `2 L1 g! E' k  |; b' e        pokeVariant[0].vt                 = VT_BSTR;
8 A' R& R/ K" r: L+ V5 U        pokeVariant[0].bstrVal         = valueStr;

0 i7 V1 _2 L! L- W% m- a         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
. o$ ]: J9 j7 f8 T) e* B- d; a2 H8 i        VariantInit(&pokeVariant[1]);
$ P2 w" c3 l) N& X2 {5 B* _7 q! \        pokeVariant[1].vt                 = VT_BSTR;
) ?4 }, T' r; @1 Y4 t! ^6 u        pokeVariant[1].bstrVal         = itemStr;
& H8 X7 {7 {7 j5 N* J7 U
% R( ]9 o6 O( n1 l. g& D* [* q' U          topicStr                                 = SysAllocString((WCHAR *) L"system");
7 T1 j  @  U% M) l* H8 @$ H2 s        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

0 E8 Y$ U/ ]3 ]! y! Z9 B# }7 n//        Set the DISPPARAMS structure that holds the variant.

5 G  T8 d4 e$ B        dp.rgvarg                                         = pokeVariant;
* S1 W" l. }2 |9 @0 O        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
* P" D8 y- c& e' n; W" V        dp.cNamedArgs                                 = 0;
. D2 p8 p) l4 b. h
//        Call IDispatch::Invoke()
0 F1 K- D* S3 f' K! q4 e
        hr = m_pDisp->Invoke(
  t2 Y/ u0 o8 T" c, V( c$ m                pokeID,
+ F+ O4 ?5 O' H% `: U3 {/ d                IID_NULL,
& S' }& ~8 e! z9 Y                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
7 P& y8 t9 A) B3 _: {. g                NULL,
                &ei,
                &uiErr);
! k$ D5 _& s: X5 ?: t
        SysFreeString(topicStr);
- D! M6 r8 |, q' V3 x- h1 N        SysFreeString(itemStr);
# p  A8 X8 F1 o. N        SysFreeString(valueStr);

! @* a$ C+ `9 ]( {现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
6 K. w3 ]! {+ D* b2 _* P$ K此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

0 h% w$ n9 r) m& k6 U5 V( H
( O) P2 I3 z. Z5 N4 N! m; N2.这是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
, D5 D7 V2 N$ j- c# A//        BSTR into the variant structure.
. n; l2 N- E# S$ W( k
0 K0 G) \: E' u2 r* d        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
" z+ L2 u1 ~6 C; T         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
8 [1 @0 H* q# b        requestVariant[0].bstrVal         = itemStr;

0 ?5 U! F/ `8 O7 @          topicStr                                         = SysAllocString((WCHAR *) L"system");
; }$ i, ^" [- r5 ]) x        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
2 p* H" l. @! H. ]; H0 K* C        requestVariant[1].bstrVal         = topicStr;

, ]( z4 y+ Q6 r% P//        Set the DISPPARAMS structure that holds the variant.
3 Z( P4 R  x7 i6 i
5 D6 O+ f( j/ N        dp2.rgvarg                                         = requestVariant;
1 Q5 b4 a1 F0 d/ f0 V        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
& v7 U% R. [! w+ a# U        dp2.cNamedArgs                                 = 0;

* q+ J. b, p% t1 q: M: c         var.vt = VT_EMPTY;

* t! n' |& {6 t9 D; l1 ]  d//        Call IDispatch::Invoke()

/ z  o* x, f) D! {) W- r        hr = m_pDisp->Invoke(
                requestID,
+ b' t9 V6 s7 F                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
/ d! K% T6 P2 a+ W! M- h                DISPATCH_METHOD,
. S1 r8 Q, w* _% Q7 v                &dp2,
                &var,
                &ei,
8 M3 S0 G( w. _/ ~' O, o. i% O                &uiErr);

        SysFreeString(topicStr);
" S% e# P% O  k  l2 ~        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
4 L7 O' \0 `- M% O) }+ i, d如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？