c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
: I+ X3 Q! e/ _4 RName = (WCHAR *) L"Poke";
& ~; V5 d' W+ i6 f7 d- L% ]                
6 O3 Z. L# R2 V8 a" s        hr = m_pDisp->GetIDsOfNames (
  @5 o. y; p1 {2 D                IID_NULL,                                // reserved
+ h4 {) ~9 ~" I, N1 F5 Z) N                &Name,                                        // Array of names to get IDs for
" q8 D) M. L1 q  j0 O! u9 g                1,                                        // # of names in the array
6 m3 \( @5 J8 W. U* z+ X( j                LOCALE_SYSTEM_DEFAULT,        // System locale
( T4 `# R5 u( i9 q- y/ J/ P                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
2 o  K8 ]' S4 Q, }- H1 m                MessageBox ("Get Poke Unsuccessful");
                return;
: @) v' C$ |- L0 {" A                }

: w+ M" a1 ]) x/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
. P) l, [" {8 u: Z6 \! M4 q         valueStr                                 = SysAllocString((WCHAR *) L"1232");
* f8 p: i6 @+ l' o- h1 @8 t/ T/ A        VariantInit(&pokeVariant[0]);
) D3 U6 a0 O# f* W) u; Q3 X; D        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
6 Y: w% H, W* x( }; z3 H+ [
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 }4 z( {  G% X. f$ ]" P        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
8 u7 V# M9 n. B  @+ G        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
# X1 S9 Q# f, @  Q& v( h: R
        dp.rgvarg                                         = pokeVariant;
8 f: ~  o' K4 Q2 F  a        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
' j+ m8 H: c  g1 O1 S, j4 Y8 |, |        dp.cNamedArgs                                 = 0;
4 j4 R  J% p  t  j  e
; j. D1 J; A  o9 Y. c1 g& X//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
8 ?. Q- b" V* S, T# b2 g1 V1 m                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
+ p; F/ [* D" o8 v3 P' @1 t; h                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
- a& l8 d5 O9 k; y. l. y        SysFreeString(valueStr);

现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
; A# Q; `1 A2 t9 p

2.这是request的程序
) P; s! s: k8 ^& d) t; A( _//  Request a value from Extend
) g0 c( w, k# U//
, A# t. {4 P9 d- j//        Initialize the variant that will hold the BSTR.  Set the variant's
6 [% Q! G. V8 a//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
. I+ w( ^5 k6 m
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 ~+ X6 V. j8 h" A# O+ ?       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# v. w3 b9 F$ c# R* U        VariantInit(&requestVariant[0]);
8 R; D8 w7 x& Y: C$ q, h  t! F2 J        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
* c1 v* c- y! H
% D" Y% |( E: s2 X0 L# f) w, R          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
3 H5 |4 Y3 |: {$ ~# p& h, G5 v
* y3 h! d; {8 V4 ]//        Set the DISPPARAMS structure that holds the variant.
$ }# o7 t, h+ W+ Z, }6 o/ m4 D
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
9 T& F* v7 f, @* t1 X6 J$ @6 Q        dp2.cNamedArgs                                 = 0;

2 U1 m' ?+ S# i* V3 q/ C         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
# h) L& G# w. Z2 {, h$ n
* G3 s# Y- o4 D        hr = m_pDisp->Invoke(
# u" ?1 W4 ?+ Y! ]6 |' I/ w                requestID,
  P, w& C( ?( q5 [1 ^/ B                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
( z' v2 Z) q, U                DISPATCH_METHOD,
) \' m, M3 n0 M# l% t2 _                &dp2,
                &var,
                &ei,
; q& o$ C6 E& k* N' y; ^/ q0 R2 N) o- W                &uiErr);
! c- |  l$ g3 ~( h) f! [4 K  |* R: I
4 y9 ^2 r/ j" H1 D        SysFreeString(topicStr);
        SysFreeString(itemStr);
: ]: }* }3 l3 z' L请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？