c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
) G$ `4 O5 ]& `: C, q! u. N2 H                
& g1 T8 B7 P4 R* a* i* L$ g        hr = m_pDisp->GetIDsOfNames (
6 ]+ @; M% ?) u# s. ]3 G4 p4 @                IID_NULL,                                // reserved
& J0 X- v" i$ g/ n                &Name,                                        // Array of names to get IDs for
+ i0 ]% W) T' w: {$ S0 z                1,                                        // # of names in the array
; W6 Z) C2 o- d. {  \8 ]                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
5 w! m9 m  e: @  Z                       
& p  C0 v4 I7 o! g6 u8 z        if (hr)
  F8 {) }2 s  c' T# `                {
                MessageBox ("Get Poke Unsuccessful");
1 W8 ~; W! e3 v0 K! P6 U* C+ i2 d# |                return;
& M% i8 f. V+ {3 @( l                }
4 p* p- K  N/ y, f, `
/**************************传递数据给extend**************************************/
* N  U7 F" l, L& E/ P, t/ D( V        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
& p: t( l5 B9 J$ E. V       
1 d% Y8 ?9 q$ v$ N- ?0 n0 m6 t         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
/ j7 F3 D' J; B8 C$ _        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

( b- }: {: D! T, P         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
, _! t+ g  W% ^        VariantInit(&pokeVariant[2]);
- j0 z& P+ i$ n( @        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
" n3 p& _1 p' E* P
//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
! v2 W, G- a9 ^; ^8 D/ S        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
, k0 ?) A% R* X% `6 `! n! D1 e" d        dp.cNamedArgs                                 = 0;
1 P7 _) W1 y5 I) X" s9 Q- j
! \7 J6 V7 V3 h$ l. K2 p9 K//        Call IDispatch::Invoke()
& R/ a5 i: C+ q  K: @" _, G
8 R8 q) F; S" O& S; `& _        hr = m_pDisp->Invoke(
6 Z# V, T0 m0 x4 E: P3 I                pokeID,
                IID_NULL,
0 S* r% V5 n) |) A: Y2 u                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
$ q( J. Q5 P3 `6 s, U/ |                &dp,
( c4 V3 @. F* _2 D/ x                NULL,
* b  {$ F& M# z. ]4 S6 R, b: V                &ei,
                &uiErr);

        SysFreeString(topicStr);
# v* H% \  m2 T  _9 ]: E8 I2 Q4 s        SysFreeString(itemStr);
$ H& ?/ I, Y1 f: X2 Z' e. A5 m        SysFreeString(valueStr);
$ E2 I6 h" V9 _5 z0 ~' Q
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
, D% S" h0 c2 P# A" n此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
! t2 H: A# c. Y8 p8 d& \

# w8 T6 U% n8 [- q2 |2.这是request的程序
# t7 s/ {; Y$ h" i, ]. E8 }; r3 Q//  Request a value from Extend
; q. D0 _& L8 P//
//        Initialize the variant that will hold the BSTR.  Set the variant's
' h3 R4 n+ ?2 W5 W# b//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

+ A6 F6 g' |" q  x4 \, {        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
8 [/ `, M. |  G# z       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
" |9 E" _: g& c: r# `9 }        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
5 _$ z+ M+ v8 ?
          topicStr                                         = SysAllocString((WCHAR *) L"system");
# G3 a; J; ?: L        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
! ?' t; E$ e6 t        requestVariant[1].bstrVal         = topicStr;

5 b; t( X0 \& r/ v9 y( M# d//        Set the DISPPARAMS structure that holds the variant.

- B% G8 B/ X/ p        dp2.rgvarg                                         = requestVariant;
) W( I" t8 Q, G+ s6 Q- \* T        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
9 @3 s6 u$ k  K2 _  z+ ?6 a& ~
) k6 e2 Q" h! j/ Q. v2 R# e         var.vt = VT_EMPTY;

# x+ U7 ]/ O/ J% c) \//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
: r# j  O8 q& v! W                requestID,
                IID_NULL,
7 U& ~( i4 i& G( M4 u  B. i, j                LOCALE_SYSTEM_DEFAULT,
# B. w& T% _+ A% v* L& ]9 T                DISPATCH_METHOD,
& t* Y4 Q3 b' H* r                &dp2,
/ c( q6 {. j. @                &var,
$ X/ W. O7 ]! S/ X8 H- ]$ z1 b+ G                &ei,
                &uiErr);

9 w! ?+ N# r( f6 [# K, S5 ~! m        SysFreeString(topicStr);
        SysFreeString(itemStr);
" m* i8 S' ?- [  y& `请问该程序是获得extend里面的哪个值？
/ L4 I& B0 H, W' r/ D如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？