c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
: T9 K. C3 s9 v) ]8 N7 `Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
" z% x) x, z3 x" m                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
* _1 l4 O% d! b( w: n3 F. m                       
        if (hr)
% J2 T$ u; _6 }6 ]% A* j) U                {
                MessageBox ("Get Poke Unsuccessful");
, U5 K! o: C( ]+ h" q                return;
                }
6 {9 c1 T# V9 h  W) R
8 \0 K) h, [. l3 i/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
: W( [& F2 b/ V, h6 r/ h       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
& [( L( I- T2 ~        pokeVariant[0].vt                 = VT_BSTR;
3 d5 Q" x3 i# b, O: f9 }- @3 ^        pokeVariant[0].bstrVal         = valueStr;

, k* X( r. \9 `% {% s         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# S6 x6 J5 x3 v2 K6 L        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
4 H7 C  k1 P) f/ `; Z7 ]- c        pokeVariant[1].bstrVal         = itemStr;
; t4 u8 G7 j' g6 g
          topicStr                                 = SysAllocString((WCHAR *) L"system");
* k4 n. R# o  i5 J        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

, K* Q- C* ~) [* {//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
, B$ `' h( S. K/ a5 s6 k  u" s        dp.cArgs                                         = 3;
, s9 {( V. p0 P- t9 S        dp.rgdispidNamedArgs                 = NULL;
; [$ z. L& z$ D4 ?8 Y        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
% j+ D/ P) }* z& G( l, Z4 b5 `
1 U1 S$ h* O, m1 N  g4 z        hr = m_pDisp->Invoke(
                pokeID,
: |+ f! [' s7 |7 h4 i0 z* U                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
                &ei,
- |5 e; Q) X+ R" b8 v) f+ A8 _                &uiErr);

# N$ V1 G8 W+ a' Z2 L        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
2 _) h: @7 W& }, r+ J
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


" r( `. W  }8 W4 `; b2.这是request的程序
* ]% G) P7 K( q7 @+ z//  Request a value from Extend
0 {$ u2 g4 {& N) r# P8 M5 ?( I//
//        Initialize the variant that will hold the BSTR.  Set the variant's
2 a" t" T# h3 _+ I/ P6 k//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
% _2 A# _: w! J1 _& @         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
( W+ Q- w% i% T9 t- |0 i, k        requestVariant[0].vt                 = VT_BSTR;
3 d' P* O" M* I$ m        requestVariant[0].bstrVal         = itemStr;

5 p8 K: U7 a9 Z. r          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
+ C* \5 {+ b5 a7 L: W# E- p        requestVariant[1].vt                 = VT_BSTR;
9 }' u' Q8 t: }) j& ^3 G6 E# [. |        requestVariant[1].bstrVal         = topicStr;
3 {" x: t5 R; j$ G# @, G: q
//        Set the DISPPARAMS structure that holds the variant.
$ S9 Y8 G  N9 Q. O! \  x' N
        dp2.rgvarg                                         = requestVariant;
/ R9 F# g4 N1 G  Z! }        dp2.cArgs                                         = 2;
+ N% t- \+ ^' @5 V- X        dp2.rgdispidNamedArgs                 = NULL;
* j7 x4 ]) h. M3 s% O        dp2.cNamedArgs                                 = 0;

& Y+ w0 s8 V1 x$ ?" E9 a3 x  c+ h         var.vt = VT_EMPTY;
. z+ d9 \, M- d7 p, W+ j9 G9 c
) C6 c0 Z2 m; A6 I2 r* V//        Call IDispatch::Invoke()

2 F2 i  M( q2 f" |) ~; ]6 q+ E& C        hr = m_pDisp->Invoke(
+ n8 w& s- e: U4 E3 |                requestID,
# T- m; i7 {" s% k: g/ T0 a7 |0 z! r8 l2 L                IID_NULL,
3 v5 _2 A- R0 I6 |- X. u5 \  w1 X  L" s2 n                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) L* A% @8 o7 }  [6 u                &dp2,
                &var,
                &ei,
# i' S. m4 E$ w! h& v6 Z                &uiErr);
9 t0 N) [5 d! r
9 Z! ?" E; y7 ]        SysFreeString(topicStr);
; X9 T$ D- K% V        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？