c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
% \3 a$ k" v6 L7 W  U8 d9 U/ c                
3 I2 A0 p6 n6 T* t        hr = m_pDisp->GetIDsOfNames (
: v$ A* v1 |8 {/ U. g                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
& o' f( t8 F; h9 z4 a                1,                                        // # of names in the array
: Y: F/ b9 d2 t9 T: j5 @                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
) G, o+ t% ?8 Z                       
1 }9 o+ p% q, U, K        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
# k8 ?5 D! b5 a# G: k# C  M$ z                return;
                }
9 b' o, m% M5 e* o! F
; J+ P) X" @$ r4 F' r/**************************传递数据给extend**************************************/
. ~) p3 Y1 T2 m2 H# t% ^! w        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
- \/ t' e% k6 f/ j) ^# N7 M       
# s$ N  C4 J( m. j, P# g         valueStr                                 = SysAllocString((WCHAR *) L"1232");
# U" a! C0 [" ^( R  e        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
9 B9 y. b" t( z* q        pokeVariant[0].bstrVal         = valueStr;

3 q# f7 T# R' W0 `' f         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# u$ v% C0 ?3 u- I        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
1 ^( C9 y1 q7 f$ A" Y        pokeVariant[1].bstrVal         = itemStr;
+ K$ J1 E0 B5 W" x. k
          topicStr                                 = SysAllocString((WCHAR *) L"system");
0 c# y* Y3 v) l7 U9 l/ W        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
" X% X5 M9 n; q& }        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
) w: Z0 H5 t5 A5 }* x        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
5 y& P+ y: c7 N( e2 G4 m: [* {        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

/ M( ?! ^, Y1 h3 P+ o        hr = m_pDisp->Invoke(
* n  g* ?- C" Q* s                pokeID,
# [/ d  P8 z: Y( {# G0 i' x2 |                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
- a; a" G& S* V. g1 t                DISPATCH_METHOD,
  b( a. P" T4 ~                &dp,
( r/ w4 \% c& z                NULL,
3 E7 v0 }: W! A) W8 L7 C                &ei,
) Z! ?+ R7 n2 [, N                &uiErr);
/ |. b2 s; C7 Z7 b1 q' J
7 |$ E$ ]$ E9 u0 D        SysFreeString(topicStr);
1 q$ f0 c  v& Q  E/ }        SysFreeString(itemStr);
5 r" s, F0 D) N        SysFreeString(valueStr);
! y/ c/ T7 ^3 _3 ^4 a( D
) v: K% ]0 D) M& y现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
' o+ I! ]- H, ~* c2 M' C: ~1 B此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

3 {- W4 D+ `9 b: u5 V
2.这是request的程序
//  Request a value from Extend
, ?& u! v2 b1 E" U+ N/ h//
4 j, Y6 a: j5 i; H: K. ?//        Initialize the variant that will hold the BSTR.  Set the variant's
5 f  M2 {4 g" Q: h3 X% u% l: ?, w//        type flag to indicate the fact that this variant holds a BSTR. Place the
: D+ P( a$ {/ w$ M" R0 ^% a. v//        BSTR into the variant structure.
+ J6 h* v/ U$ Z1 m! n5 E
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
9 ]" M: ?) H( }1 M' J- v        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
7 ~' v8 h+ h* U  t* ^        requestVariant[0].bstrVal         = itemStr;
$ H! v; @: q4 z
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
0 J+ \; @: I8 I$ @1 E& N        requestVariant[1].bstrVal         = topicStr;

( k* n% h8 b* C( B4 y- b//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
& Q3 m- i& x1 q% {6 [4 c" Z: u6 c        dp2.rgdispidNamedArgs                 = NULL;
7 Y# n, I! k- i. L- ?) f        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
3 ^$ ~; O! e) u% k' m9 }3 Z
//        Call IDispatch::Invoke()
5 e. _" e% D6 _0 r. o
8 z- ^  E4 A& ^( a2 V        hr = m_pDisp->Invoke(
                requestID,
2 t3 w0 E+ J" w1 {                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
. y* G' R% M( y# B4 Q  x% p                &dp2,
7 I- r; I+ X- ]3 p                &var,
5 q( s$ }( k7 x* v4 I                &ei,
$ c' H! y1 Q. `% x' ^                &uiErr);

* |8 e$ r2 s% l# s' Y3 z( d' x        SysFreeString(topicStr);
        SysFreeString(itemStr);
' J/ W* f% {6 Q  v* @' L请问该程序是获得extend里面的哪个值？
: L) y8 t8 o4 M) w8 u8 U如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？