c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
  V% s0 J2 W! e7 G+ V( z5 W1 F+ z( W7 nName = (WCHAR *) L"Poke";
' |3 e# G8 S# q1 I, j                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
+ b; {1 q* ^0 B. v; X                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
' y; a* |4 N2 ?! B0 e4 r- f                &pokeID);                                // Array of IDs to fill on output
' ?2 ?5 x. [: w7 U% \" N                       
        if (hr)
# j# _2 u6 }" B) _: K+ W6 ^                {
                MessageBox ("Get Poke Unsuccessful");
" G% M# G! ]" _3 F" J8 {                return;
; D6 o' @" c% ]" w0 K# @$ P1 X2 a                }

/**************************传递数据给extend**************************************/
/ E/ k; r- d/ c        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
$ E' v+ ^) B2 C2 b5 D" T: g         valueStr                                 = SysAllocString((WCHAR *) L"1232");
+ ?, |3 p; Y9 q        VariantInit(&pokeVariant[0]);
4 v& G2 M/ I8 W- [% W        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
$ [9 A( w( z9 Z
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
6 F) J3 z* `1 @% J& Y" p7 A        pokeVariant[1].vt                 = VT_BSTR;
1 D. n) \5 e' p* S/ \0 D$ S/ N        pokeVariant[1].bstrVal         = itemStr;
5 X3 e. V3 A+ c7 R9 x! ]$ T2 m
          topicStr                                 = SysAllocString((WCHAR *) L"system");
/ g: ~. u2 n* s' S        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
! V# W: T9 j" a" r+ X, B* z3 Z* V
4 P& @: b% }7 D//        Set the DISPPARAMS structure that holds the variant.
5 f  o8 T; w* U: O3 O5 q
: j9 d; d0 [6 B" j( H/ A        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
5 k) s# o7 D; q! S8 {        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

6 G8 O7 i) `$ A; c3 F: J3 x4 ^5 G  Y//        Call IDispatch::Invoke()
+ u7 E( g* r, m. p& ]# q, ?1 d( P
        hr = m_pDisp->Invoke(
0 U& ], B- `5 z                pokeID,
. ?/ \& W, g3 Z5 H( c                IID_NULL,
& L* ^  h+ F  o" s. W) |" W( E                LOCALE_SYSTEM_DEFAULT,
8 t, J3 o6 D" x0 h& ]4 g$ w                DISPATCH_METHOD,
                &dp,
; {: U+ }. V% |# M4 f                NULL,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
: f; ^) I# I# L+ L! e        SysFreeString(valueStr);

8 L2 d4 _0 z# Q) D) S, J/ }现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
# h2 i2 K# M  A7 }5 S此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
# R: v; y. s* L* `$ j
1 b' Y1 Y; f% T  j  T. g
" B) v/ j: n& T- s4 @+ y2 c$ O2.这是request的程序
$ Z4 }7 ]6 K. `) N2 S( `5 G//  Request a value from Extend
7 D, N" G' M9 s! L5 R9 E! d//
//        Initialize the variant that will hold the BSTR.  Set the variant's
- \& E9 f5 |: _9 s; o7 o3 z' b//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
( T* r' x0 z% E" a8 {( S8 L6 l# O
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
) a( I- Q8 B! t8 e3 X7 }1 b3 G       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
) q; F5 j' a/ e# E        requestVariant[0].bstrVal         = itemStr;
9 J6 Z6 u* n7 Z3 ~4 H
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
( x2 N/ ^7 b* v- f4 J3 X        requestVariant[1].vt                 = VT_BSTR;
2 Z, a$ c$ Y: K        requestVariant[1].bstrVal         = topicStr;
. \, y/ v% R9 a* f5 a; R
) Q& \$ w3 w8 M. y//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
8 `" q! G+ V1 b
4 b, u' U+ \& r  e  d9 W) ?: T//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
* q: o# M2 F# O3 u; ]) u                IID_NULL,
  j4 N+ z- A" z; ^                LOCALE_SYSTEM_DEFAULT,
: _% ]8 b- ~% E; B0 t4 c; g                DISPATCH_METHOD,
% E  l( ]$ n3 P' ?7 Z1 L% g( h                &dp2,
                &var,
# _3 ~- ], Z0 P. \: ?                &ei,
                &uiErr);

- ~" L+ D9 `( ~4 g* [; Y        SysFreeString(topicStr);
, |, m2 Z7 P% k+ g( R  v        SysFreeString(itemStr);
6 c- i9 x. ]& L" R2 ]7 F1 T& R1 n请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？