c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
7 i( [$ w; p( _* D' e7 e# sName = (WCHAR *) L"Poke";
                
3 B  `8 }: r$ v/ Y        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
+ p# m6 X0 p7 @2 e6 N) b                &pokeID);                                // Array of IDs to fill on output
! F+ O  h) R) N: w, B/ ~1 D' v" Q/ `                       
7 k  k! C, i# r4 M4 E. g* o& g        if (hr)
* X0 P' k) a6 K7 J  x4 P                {
                MessageBox ("Get Poke Unsuccessful");
# T5 C4 s  [$ H( B1 T. F5 q. N# U                return;
                }
0 ]3 g: g' F& ?' e$ P
+ i1 i4 Q2 T* @& G  ]- k/**************************传递数据给extend**************************************/
9 m+ V# e" }: @4 T  Q2 z/ i        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
' s- b4 p: c- \' u: V( m; b% p         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
% S! x# A! i% u) V) e        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
: E5 k  N& f8 F4 B+ @5 n3 b+ J& z
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( y. V: o  l% a/ |9 y, V2 d9 w: I        VariantInit(&pokeVariant[1]);
5 p- M6 w9 p  l7 X, {' _. L        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
% E9 C+ t0 F; r% O& @        VariantInit(&pokeVariant[2]);
' r5 o7 G  Q+ P$ L        pokeVariant[2].vt                 = VT_BSTR;
1 }% ]' `) a" |1 e8 R6 M5 v        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
/ J2 _- m; a8 f! U3 |8 i
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
' J+ D, q. F: e! G4 m
5 ]1 |# D: l6 H/ Q& d7 v//        Call IDispatch::Invoke()
! D$ n; S  M! o, o( f% t2 o2 Y5 b
6 }) e- Y8 K% }2 ~6 `; A2 v        hr = m_pDisp->Invoke(
                pokeID,
5 X4 u; t. k  ]; d" p) P0 h                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
2 D0 C1 A( ~+ p5 ]0 Y, w, g! A                DISPATCH_METHOD,
' B4 Q+ M8 [% S. @- R% w7 R2 p& i                &dp,
5 ~* ?6 y/ U. P4 y                NULL,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
) m, m2 g1 N$ v; F) `; B# H8 B* [        SysFreeString(itemStr);
# w+ N( j) {. [) g        SysFreeString(valueStr);
6 Y! N4 `) m  i# O
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

$ ^* r7 {' \' d3 z8 z
/ U0 m- V! J: K" z6 j. r2.这是request的程序
3 [+ y( Z3 [1 V//  Request a value from Extend
//
/ E: i9 \6 L! G* W+ |//        Initialize the variant that will hold the BSTR.  Set the variant's
0 e- A9 V* G7 P7 b5 K5 S- U//        type flag to indicate the fact that this variant holds a BSTR. Place the
9 s& A" O3 r$ ], K! a+ e: B) W# \0 j//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
* K% Q/ z- H  I$ w       
% f# y; k: B: g- ~+ s7 o         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
; `, B7 W- U4 B  P        VariantInit(&requestVariant[0]);
( k5 k0 A- m9 s& s* ?        requestVariant[0].vt                 = VT_BSTR;
/ F8 I% t5 ~! \4 n7 d        requestVariant[0].bstrVal         = itemStr;
* M, t# `2 c% @, t: R+ r
! r6 R0 }9 g4 ?, G          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

, O" U3 q: p" O( f' V/ h& ], G//        Set the DISPPARAMS structure that holds the variant.

6 I5 L+ g% ?/ e! w/ k' I        dp2.rgvarg                                         = requestVariant;
+ v) [* ]* Y) W        dp2.cArgs                                         = 2;
7 W1 b* a' r0 y+ I( J        dp2.rgdispidNamedArgs                 = NULL;
/ H5 q" Z' Y# E2 Y& G* W  e        dp2.cNamedArgs                                 = 0;
* P% L+ g; w' \/ d" B0 T3 K% n; t
        var.vt = VT_EMPTY;

! V+ T- t6 w. K9 F! m, h9 O- O//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
4 X5 W, T# p3 M# u* ]$ h  o                requestID,
                IID_NULL,
9 L( q$ V# c8 {0 j                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
6 {- r! G) Q1 Z                &var,
( W  J/ }2 r' b9 c* h                &ei,
                &uiErr);
+ {  m- {: P9 U2 O( E3 o3 p4 q
        SysFreeString(topicStr);
0 N$ |/ t5 O$ T9 ^) g* @$ V" a! e, Q        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
/ ?& Y# E' q5 }1 U如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？