c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
1 R* c6 R* x. Y                
! [" m& o4 M0 u. b+ Q  @; _        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
8 a) M' e5 M1 [) Q3 ~8 j% f                1,                                        // # of names in the array
+ }- ?! a! F- t+ E9 `                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
' V8 M: O8 Z! C5 e" p1 o7 l                       
        if (hr)
( m: g- }5 r, W7 z9 w2 L                {
                MessageBox ("Get Poke Unsuccessful");
9 S5 K. c' B7 {                return;
/ j9 g3 h- ]% c' b9 i. C% c9 o5 H                }

/**************************传递数据给extend**************************************/
4 T; `0 p. M; e$ X        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
, w6 o8 s2 t: }2 i% n$ `, d        pokeVariant[0].vt                 = VT_BSTR;
) W+ B/ B! {  q: ^! c        pokeVariant[0].bstrVal         = valueStr;

2 F1 o& x# d* q1 h- p: u% l7 j         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
3 g! ?4 N* m+ w$ c2 e8 l, t        VariantInit(&pokeVariant[1]);
" g0 `7 b( z" S* U8 W+ p  o        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
9 a$ j& Q+ k6 v. Q, a" {, j
! {# k. ?: F& d+ m* k          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
- o$ {# m  m; ~8 j* B        pokeVariant[2].vt                 = VT_BSTR;
+ H2 @. y) F+ I  D, i2 S        pokeVariant[2].bstrVal         = topicStr;

7 }' @) a/ g' v* o//        Set the DISPPARAMS structure that holds the variant.
$ V/ p" F; F7 F1 s  S* `, a
% r7 j( }3 N( k2 ^9 J& L        dp.rgvarg                                         = pokeVariant;
- d8 D& Z; K5 N# i" U, w$ `        dp.cArgs                                         = 3;
2 n7 A3 t  H+ {( u/ M- ~/ z        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
: c8 v" [9 O& x: u: d; S+ ~( w( f2 Q
& C  F: P" u: x# N) r5 Z//        Call IDispatch::Invoke()

3 x6 [# r2 d" j9 P* B        hr = m_pDisp->Invoke(
  s) ]) d! o, |9 A+ d* `                pokeID,
- e& |: y7 i, [$ I                IID_NULL,
( h6 ~1 R: E0 R7 C* J6 z1 r6 w  ?                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
% ]- ]+ G" r0 e) D* r. V2 O  [                &dp,
                NULL,
& \. d; P6 |. M5 c$ r# |/ G                &ei,
6 d4 N3 P% T1 t- r/ s                &uiErr);
& `4 ]% E4 W; u
% H! _1 _5 j- q  D! Q$ w        SysFreeString(topicStr);
/ r& z4 {, O0 d        SysFreeString(itemStr);
        SysFreeString(valueStr);

" D% l( t$ {2 U/ ~2 @0 n; u( l6 Q现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
3 d% V" b+ I$ ?! o2 T+ J

2.这是request的程序
//  Request a value from Extend
' L  M9 D  T5 k4 r//
% E. a" w6 s( |+ `! g2 x( E//        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.
( G& a. o! F; u; s
4 ?8 A5 V, ]2 \2 ]( h- R8 K3 Y        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
, a7 T7 W  K. U( a       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
& A. `  [- `& {: _        VariantInit(&requestVariant[0]);
5 U/ [" @" W0 I        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

5 Z/ {) {5 g; {  K; e5 u' H4 b9 x, O( t          topicStr                                         = SysAllocString((WCHAR *) L"system");
9 h% O" {- ?, V7 K        VariantInit(&requestVariant[1]);
0 o1 Y" v0 l$ o5 ]        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
& T: C7 B: E$ `
& Y% g+ h) [/ s$ ~. f        dp2.rgvarg                                         = requestVariant;
% P+ t1 Q. K5 j+ L& I        dp2.cArgs                                         = 2;
6 C4 T1 P" m) R  D) t        dp2.rgdispidNamedArgs                 = NULL;
1 {5 U, ^+ }/ _! g5 V1 l# o        dp2.cNamedArgs                                 = 0;

3 s5 |6 F$ m& \3 L         var.vt = VT_EMPTY;

; ^9 l$ R; V& _//        Call IDispatch::Invoke()

4 n3 x3 P% `; c1 A        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
. R  `: U; ^1 g: z+ c/ _. [                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
2 i8 i5 U# L9 |                &uiErr);
7 \) A. D2 N/ Z3 o/ X
, K% }% V% _* r' N3 X2 y        SysFreeString(topicStr);
+ v& d" u& f: o$ `- j) X. a        SysFreeString(itemStr);
- b% L: f9 F. ]1 Y! Q+ u请问该程序是获得extend里面的哪个值？
' i, e- A" O6 V如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？