c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
& {0 Z- c2 P5 [# ?! vName = (WCHAR *) L"Poke";
# D8 Y- R7 i) D( _                
        hr = m_pDisp->GetIDsOfNames (
$ r# I" c  B0 b8 n9 X: s4 p                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
2 E, b/ i) R2 B! f9 R, g                {
  o  j$ y1 v2 a' ]0 i                MessageBox ("Get Poke Unsuccessful");
6 y& ~! a( [3 Z% f) Q                return;
                }

: G. @+ e) R3 T: t2 |" ^/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
3 L0 {- N( V( C6 `5 M        VariantInit(&pokeVariant[0]);
8 q4 Q) x/ Q' Q: e5 _+ f        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

7 c8 U# ^9 W3 g8 ?6 w         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( L' g1 G2 a( b+ x# ?        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

) u6 F$ I  |- O1 r          topicStr                                 = SysAllocString((WCHAR *) L"system");
& a7 j3 o; G2 R6 P; }- b        VariantInit(&pokeVariant[2]);
* l+ t& I/ W; y        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

. ]1 D9 O* \1 L6 o//        Set the DISPPARAMS structure that holds the variant.
; G' Y! g. x: A) M1 F/ V7 y9 J5 @! Z9 w
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

* v- i3 z. v& G  w2 [+ w% r1 H//        Call IDispatch::Invoke()
% f% t( i$ i  {( L) b
5 _' v' t; z( s        hr = m_pDisp->Invoke(
9 e7 b3 C! E0 [0 [: c                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
+ U$ R0 J9 L+ d. R. t                &dp,
                NULL,
9 V1 v7 K$ _% u* F* S, _2 M. R( Q                &ei,
" P6 G5 {/ R3 f+ ^                &uiErr);
2 k) q- ?8 q. u2 O7 z) u
        SysFreeString(topicStr);
0 e# k+ X) B" z        SysFreeString(itemStr);
        SysFreeString(valueStr);
; y. K! w$ {. `% d. ^
" R! L$ d3 m9 D) r5 [/ M现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
: N; q5 W9 b8 ]1 `
4 K9 b# p: f8 m
& D4 ~2 x+ W( P% e2.这是request的程序
//  Request a value from Extend
9 `( p- |8 p/ J//
8 ]0 A4 _/ m2 Q4 p4 Q* U% a//        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
//        BSTR into the variant structure.
/ R6 T6 \  Q) u& o) D
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
" U% k  x- s- f       
/ |: k+ r; L$ }  T4 S% }/ L8 V         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
! [9 D/ t  G! r: |! B        requestVariant[0].vt                 = VT_BSTR;
+ F6 r  B/ z7 p3 `+ @: y        requestVariant[0].bstrVal         = itemStr;
3 w# B4 t. _6 G& a
3 E! J+ Z. q1 r) n1 x% J, j. R4 R          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
% K. h) B$ v! d8 t7 O/ v* D/ r) X        requestVariant[1].bstrVal         = topicStr;
& e8 c7 h- U% x' U5 B
//        Set the DISPPARAMS structure that holds the variant.

- E2 D& G8 G7 j5 y) {# e. F        dp2.rgvarg                                         = requestVariant;
% X  N( D0 `; g8 \. Q' L1 T1 }        dp2.cArgs                                         = 2;
: r0 N* u4 z- T1 A        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

7 H% i; P9 v4 n) Q  ?$ I, i5 V         var.vt = VT_EMPTY;

5 X$ ?1 f% A9 |' D3 T2 _3 Q+ e, S//        Call IDispatch::Invoke()
0 L+ `- ]* @  @9 f2 k+ r3 @$ G+ i8 I
5 v! E3 ~" {- p8 F9 L& B7 |        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
' K' O* R! P4 y5 J                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
4 ?- x# j6 i* a% S: M0 G' G7 W                &var,
6 l: N' n+ n7 x4 i                &ei,
# z: p0 ?2 o6 y: D                &uiErr);

0 ?7 a& x! n1 u* l! Z, z" v: G- ^2 t, ]        SysFreeString(topicStr);
  }$ b5 U2 i0 g/ B) c& A        SysFreeString(itemStr);
" |) B. O9 H7 ^* S请问该程序是获得extend里面的哪个值？
  z) j6 h8 i$ o: I+ M' K( e如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？