c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
1 B3 Z1 T1 G# |. I1 K! |6 lName = (WCHAR *) L"Poke";
+ X$ Q& v8 ~) o8 h6 @0 A0 b& ?8 p- z                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
5 F* w+ t! B- }0 @% r! }* ]+ s  J                1,                                        // # of names in the array
% B$ m4 F1 M% k# j8 O  E4 H) r% |" m, L5 L                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
+ ]" z( f( n% E" d; _: X                       
        if (hr)
                {
1 B9 a, U$ c  x0 R% j1 \                MessageBox ("Get Poke Unsuccessful");
8 d- Z, A% [' e                return;
                }

/**************************传递数据给extend**************************************/
% c4 C* u) [3 z3 W) U* R        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
3 z8 q; Y2 L9 V) c6 E- ^" i1 c       
7 T( h6 b! f' \# W4 s         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
+ e) l% O; n1 T' P) @  B* V
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
6 T! X  `6 ]$ L" }/ j9 M; Q        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
8 j6 y3 J$ t/ t- z4 D        pokeVariant[1].bstrVal         = itemStr;
! W- }' w* A. ~
9 y0 {& m9 _6 I$ o3 Z( v          topicStr                                 = SysAllocString((WCHAR *) L"system");
( J) ~; R& B9 @( E' V$ }: B; L) U        VariantInit(&pokeVariant[2]);
) J$ M! y2 }+ _        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
, g- V6 Z, j  e, x
3 V: d( [0 _1 T0 w6 J//        Set the DISPPARAMS structure that holds the variant.
2 w% M3 q+ V; V3 m1 \
        dp.rgvarg                                         = pokeVariant;
' _8 {5 E: B2 @' \9 w* j6 e! d; o9 m        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
+ o) ?5 \9 E0 e2 C  o" s
//        Call IDispatch::Invoke()
1 E8 h1 _8 T  j; u8 r
        hr = m_pDisp->Invoke(
                pokeID,
. }" w- \5 R2 p* [6 d5 z8 m# C2 @                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
+ A- u, g: a% {: S6 H; C                DISPATCH_METHOD,
                &dp,
5 F7 m! M: ~0 g, i; |8 T6 F! f0 P5 `                NULL,
& t* Y5 t( t' z                &ei,
                &uiErr);
9 V9 S2 h8 O( F4 w( Q- W
        SysFreeString(topicStr);
' d1 C# c. i% g" n1 u  N: \5 }        SysFreeString(itemStr);
0 R# C5 E& W) Z! L+ F$ Z. k        SysFreeString(valueStr);

- v8 s# V* f9 ^现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
8 D2 V/ w( i& B( `6 z9 w* l此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
# `6 W0 Q  w1 o" [& U3 i

- O. ^1 A0 ^& y, j2.这是request的程序
, r% N# B2 R% @4 R* [/ n& ~( W# H//  Request a value from Extend
//
0 J& q- J9 z6 `8 q. Y//        Initialize the variant that will hold the BSTR.  Set the variant's
2 s$ q+ }' A% M5 ^( g//        type flag to indicate the fact that this variant holds a BSTR. Place the
6 q0 B2 W! X* ^& q' [; C" Q' |//        BSTR into the variant structure.
4 q4 }' O* r+ k
* B/ n6 b& U" x. I8 ?$ O        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
' B! R/ K* N$ K/ {         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
9 o& c, a( A7 {- s: E; E. O        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

  L( i  M# H" {) K- a, {& Y- W          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
- n5 c% Q/ x6 I) n        requestVariant[1].bstrVal         = topicStr;

" K$ ?0 }; g2 ?+ c, L: }' |% l//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
! I- j' ]$ t2 ]+ h8 K        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
% @1 H. ^- }/ O  f        dp2.cNamedArgs                                 = 0;
* X" C. ~; R* I  @) N+ m9 e- X
        var.vt = VT_EMPTY;
1 l& }2 H3 _+ p+ r5 {
//        Call IDispatch::Invoke()
" q1 J* B8 d6 R
        hr = m_pDisp->Invoke(
0 R* T" V) `" m8 i                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
: d; ~/ M7 J) J                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
                &uiErr);

8 U/ h: [5 V4 b        SysFreeString(topicStr);
/ v( a; u  x  V        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
+ Y4 m1 T# E8 x& Z) ~/ ]如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？