c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
- i2 k0 W3 P7 v7 x. x$ \/ s+ vName = (WCHAR *) L"Poke";
                
, L- |+ D8 V2 t+ V! M- i        hr = m_pDisp->GetIDsOfNames (
8 E* b0 V' |8 y9 b& g                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
: E: d0 [. u2 J% r- U9 \, i7 }                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
- Y% a' S/ t2 ]) U7 ], w6 B                {
                MessageBox ("Get Poke Unsuccessful");
. @: J. U( F5 O  H9 a) B2 g0 Z                return;
                }
! k* q$ b' @' n* w4 U9 a
1 t1 b: }4 R7 P+ U% _/**************************传递数据给extend**************************************/
! H8 v! A5 t9 g/ H0 g4 a" s/ G0 J        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
0 ]2 ^0 E5 j* Z. V) V4 [2 i       
& r  d* ]% h/ S% n) e7 a; A         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
; y- Z) h7 O1 {: f        pokeVariant[0].bstrVal         = valueStr;
2 b3 m. e- [: o! c! t' k1 B3 b
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
1 Z& M) m& l0 F* A& f- ~3 Z# t        pokeVariant[1].bstrVal         = itemStr;
$ q; m# m$ [, K' |; I
          topicStr                                 = SysAllocString((WCHAR *) L"system");
* _1 w2 g" ]8 w4 {3 @" _+ o! T        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
) B3 T0 Y5 w+ k        pokeVariant[2].bstrVal         = topicStr;
4 H9 t4 e/ Z0 g. W8 t2 \9 P
. J0 T, f+ A3 q) V) b//        Set the DISPPARAMS structure that holds the variant.
3 N  N" v( n. q: `
; R- W1 t4 n2 ~% l+ L        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
1 ~6 Z/ }1 B$ p" w2 H        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
+ k0 }7 P8 k/ u0 o* f- X  [" V
5 g$ B! {4 z! \! l//        Call IDispatch::Invoke()
+ v$ k% Q7 b' Q, _4 H. o
9 e6 C; O: A1 ?2 s1 C& v! y0 _        hr = m_pDisp->Invoke(
  ?# q# J$ K" N* N                pokeID,
                IID_NULL,
# m8 n0 p9 o! A) z" X                LOCALE_SYSTEM_DEFAULT,
" ^4 U2 i% p- W: h+ ?. J: [                DISPATCH_METHOD,
: w% j" @- L  W1 q( Z+ p1 @                &dp,
# C6 G/ n* q, j) ^0 r7 G                NULL,
8 P/ d6 k6 Z# O4 p/ A( t% o                &ei,
/ f" }* g& n& \+ U                &uiErr);
, a7 a8 ?' Q) x+ d; ?: ^6 w6 U' i
        SysFreeString(topicStr);
        SysFreeString(itemStr);
2 ]2 F. `/ }$ D/ D: ~- ^        SysFreeString(valueStr);
+ T" f1 X! ?7 p9 ?, h. O  F
0 J. B4 C- r& R# E3 @2 v5 k现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
# Z! }: o- {* F6 e, X
6 D4 [% u; P8 P
2.这是request的程序
//  Request a value from Extend
' i1 l. F* U: `; K( [  u//
# E5 C0 e" O' u" z, J# O//        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.
  J8 E( _6 h7 Q/ t, H8 Q+ M
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
$ F0 O1 v6 E+ m  B4 D       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
/ U9 ^/ ]; p, J) N( c: Y        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
3 l% y, p! E8 l* Y        requestVariant[0].bstrVal         = itemStr;
" a0 w; S) ?  f5 d2 L% h+ J
6 [6 m, ?' n3 K9 ]# _          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
2 u* \/ @1 J5 \7 c: O( u        requestVariant[1].vt                 = VT_BSTR;
0 n# p; k, t4 `( F/ Z        requestVariant[1].bstrVal         = topicStr;

4 A4 t# e: g9 i//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
$ C$ f" _& e" |4 y& ]) j' c+ X        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
$ M; a/ O6 m8 G- `* M
- L5 O' ]/ \* p  I. u         var.vt = VT_EMPTY;
  t4 ]2 i* R: \5 o/ z! f* f7 J
# R1 m5 Y0 I- {; w$ h% R5 K; `//        Call IDispatch::Invoke()

' ]8 t% ^4 L7 D: I* f% N        hr = m_pDisp->Invoke(
                requestID,
) p6 A9 n( k  h2 P8 T                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
- T" B" q2 {4 _0 V9 Y                DISPATCH_METHOD,
                &dp2,
6 b$ N  Y7 r, R+ M' M' r! V                &var,
                &ei,
$ A" P6 ^" ?( A7 G9 w3 `                &uiErr);
7 m2 B7 v. Z1 Z& E2 Y: |) M
        SysFreeString(topicStr);
, }# w7 c# u( b/ }3 O  m7 n( n0 v        SysFreeString(itemStr);
2 s$ S/ d) Q2 |" {请问该程序是获得extend里面的哪个值？
: h+ v" m1 c) A如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？