c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
2 E0 O7 x; B7 \Name = (WCHAR *) L"Poke";
! C3 t. v$ f5 O5 X! ?! k$ L8 U                
" ?3 }" K) Y" t  C9 L        hr = m_pDisp->GetIDsOfNames (
* Q6 k4 X0 O3 S  k$ J                IID_NULL,                                // reserved
* a  d3 [9 d$ ^3 j                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
0 [  b# h* c* n2 r5 c/ M, n                LOCALE_SYSTEM_DEFAULT,        // System locale
4 Q; P" o+ q7 J/ ]: c: M$ _) p                &pokeID);                                // Array of IDs to fill on output
                       
- W% x$ h! \) u' |4 F        if (hr)
+ x9 U, `1 s8 a( {2 {% y; L) r                {
                MessageBox ("Get Poke Unsuccessful");
                return;
- a' A: ]/ {9 m7 y* A                }

/**************************传递数据给extend**************************************/
( b6 X8 @, m: b3 H$ V  _        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
; ~; Z. Z8 K0 P- S% @5 V       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
$ P5 j, a% J, P$ _3 e- M2 o        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
$ H- g7 b3 _6 X) W# x0 W, Z
$ T: V- Q& R6 j3 X1 h4 Y# @$ b. |. H         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
7 i. |( u& j# c1 P; G0 x        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
6 p+ X; p% I2 u& i/ K/ m        pokeVariant[2].bstrVal         = topicStr;
$ V# s& B6 I$ g9 R6 ]1 y
# j0 I# v. G' @* H' p//        Set the DISPPARAMS structure that holds the variant.
7 c* e; b* m$ u5 H  A  k" `
7 g" ?! S6 o' k! w+ u        dp.rgvarg                                         = pokeVariant;
: y  h% U2 w/ }5 K        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
& Z% t! E8 W9 c  @
//        Call IDispatch::Invoke()
7 H" B; W9 ]8 ?  y) M$ q
( R, R9 Z6 Y, n" B2 V9 L: g# Q  H        hr = m_pDisp->Invoke(
                pokeID,
0 }) o: R$ B* m8 k$ w/ t9 m                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
; T9 b; J7 _5 I* Q8 R7 r. x                &dp,
                NULL,
6 o! f' o7 ]4 D& p( g$ C* P                &ei,
  ~- O# v, ~! z0 ]$ d! p                &uiErr);
& l6 X5 Z7 O% z0 ~5 e
        SysFreeString(topicStr);
$ r# ~* ~* A8 U3 B3 @, Q4 w% G        SysFreeString(itemStr);
        SysFreeString(valueStr);
1 p+ T7 D0 L. D' Z0 {
$ O: _) s* Z- x* o( T现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
: _, q4 B, ~4 p9 \8 a+ ]  k/ p此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

" }: Z" s# a9 m2 Q
2.这是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
" a8 e  n+ N3 ]$ |$ H+ A- y//        BSTR into the variant structure.
/ D1 F5 c9 R. Z. E+ `& E% y
! s& V7 |& K2 E        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
4 p0 ]& k2 B+ E5 ?        requestVariant[0].vt                 = VT_BSTR;
5 ]) w. ^' A3 K1 `9 ]! z$ _        requestVariant[0].bstrVal         = itemStr;
8 c- c* n/ d6 j4 ~& L% x
4 z% k2 `% `5 Z5 Y          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
, r2 R0 i/ T) j- _        requestVariant[1].vt                 = VT_BSTR;
: e0 M8 e' ?- R. ~  y        requestVariant[1].bstrVal         = topicStr;
' j. l2 x% \; |, \' B
# i' t: [7 M/ T6 R' x//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
& b+ z0 K7 S; J1 a" X) b) b        dp2.cArgs                                         = 2;
3 |! q2 Y1 }" i2 C+ O/ R  |        dp2.rgdispidNamedArgs                 = NULL;
2 C$ G& H% a& ]' O5 f4 m        dp2.cNamedArgs                                 = 0;
" O3 p1 W7 \$ h; a' t+ Q
; Q- u5 r+ w# G- K         var.vt = VT_EMPTY;

. D$ p3 i0 m1 N9 o//        Call IDispatch::Invoke()
2 i$ M% N+ F/ T) M1 [
        hr = m_pDisp->Invoke(
7 H# J) B" k. ?( w( ~                requestID,
6 e  Q$ f8 K3 i4 E& A. z3 ]; G                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
  R* H) I& m' n% m6 Z1 F( M% Z8 j1 s                DISPATCH_METHOD,
8 W) e$ b! l9 v+ p+ K: `/ y                &dp2,
                &var,
                &ei,
                &uiErr);
4 |! ]* Y' F: S6 c: z, T" O2 Y
        SysFreeString(topicStr);
! M9 M& d, C, a- ~% M        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
. _6 C  V1 d* C( l3 A如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？