c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
/ `( ~6 f$ m) @: c/ j                
1 z6 b% L1 K' t' @& z1 E        hr = m_pDisp->GetIDsOfNames (
7 [  S$ X* y$ U- D( y1 K                IID_NULL,                                // reserved
! L# O) R+ G9 J                &Name,                                        // Array of names to get IDs for
& o, }9 V* ?9 T9 `2 k                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
9 @6 d4 e3 K" {* O                MessageBox ("Get Poke Unsuccessful");
                return;
                }
& n! G1 Z, X: |/ ^; f/ h$ [  G
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
& L  y4 W: f" ?1 ?         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
! Q7 N9 B" E( W7 i4 I# V        pokeVariant[0].bstrVal         = valueStr;
6 z* K! L2 |+ A. q' Q
7 f$ s' G% z+ A6 X         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

5 {2 ~9 q* f. b# f1 U& R          topicStr                                 = SysAllocString((WCHAR *) L"system");
6 r$ x* v# o3 d0 @& y        VariantInit(&pokeVariant[2]);
7 F0 @2 \0 B! |! e4 U        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
$ z) P! D8 W) ^+ e& H
0 e, d8 ?6 d* u3 c//        Set the DISPPARAMS structure that holds the variant.
9 l) V/ b: T# f; F% @+ h
+ o8 R3 x# ?. I$ r5 K        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
5 K9 R8 L9 G) [2 [7 V5 f        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

5 D  T5 w' d) G: c        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
2 j6 r- M$ g6 C6 g                &dp,
8 L- F2 g* Z$ Q* x7 m                NULL,
' E5 J8 i% l9 i1 q3 S. b1 W                &ei,
. U5 Z( k1 ?: m# I' L                &uiErr);
2 G9 o  ?, V8 X) I& l  O& b
        SysFreeString(topicStr);
$ Y: x7 Z7 [9 C% @  T+ n, }        SysFreeString(itemStr);
$ p' V( T1 ?6 K: X% C  ^, h  o+ d, `        SysFreeString(valueStr);

现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
7 N. U* \! n1 A  J

, r% U- r( R5 r) ^$ f' l: e) S2.这是request的程序
3 W9 q1 G) i. [//  Request a value from Extend
//
% T! f% B9 f, t. r$ i//        Initialize the variant that will hold the BSTR.  Set the variant's
/ Q6 k! z( B+ @8 k3 I//        type flag to indicate the fact that this variant holds a BSTR. Place the
( _5 C/ J4 j; ?) n' q# `  _//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
  i- G  @4 R; y9 z9 G+ S         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 ?2 C" R$ b$ f( Z9 y( t        VariantInit(&requestVariant[0]);
1 \( j2 a4 @: G0 E        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
0 F* `/ k, |. a% x8 Q* \        requestVariant[1].vt                 = VT_BSTR;
  M. ]9 b- S( }- B, Z  z" R  E$ s        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
  Y# Z" E' s1 y1 g* N+ b, g: v
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
9 O% a  ^7 K* w8 ]7 o* E5 }
) B* `% @* X6 R' x& H: D+ @         var.vt = VT_EMPTY;
9 T/ ]) h; N# h& n" O$ M9 m) ^
- Z# ?' ^) B! ?( D; Q% L//        Call IDispatch::Invoke()

) A( i1 s) c0 y* T( J        hr = m_pDisp->Invoke(
) t" k2 M& a3 w2 T4 a                requestID,
0 {/ }5 c' X( o% B                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
0 U/ l: g, r7 f                &dp2,
                &var,
+ ]) A% M7 A! C; Q- R+ o4 X                &ei,
                &uiErr);

, }! D9 |$ Z5 I% z% R& S5 r: d! Y        SysFreeString(topicStr);
1 c7 L1 a+ c7 e- @! I9 v+ y        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
, S) r, c3 m% j" P: K6 J如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？