c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
; w2 e0 K/ Z  [, ?* ^6 nName = (WCHAR *) L"Poke";
7 c2 W6 x' Z% X                
1 W% Q6 @' L. y/ R. {' Y# O        hr = m_pDisp->GetIDsOfNames (
1 C& L* _( d* t) z                IID_NULL,                                // reserved
0 T" U- t* k2 ~6 D9 b3 B                &Name,                                        // Array of names to get IDs for
; w8 M7 b7 C3 s  G9 K                1,                                        // # of names in the array
- l: V6 n- t, ]6 U3 v4 ^( ^                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
% d/ ~# [" C5 z1 L7 Y4 U                       
+ f; C7 H* Q$ O6 T6 u  q0 [        if (hr)
- m4 C6 Y4 _) M9 W! p                {
                MessageBox ("Get Poke Unsuccessful");
9 j1 r, r* R. c+ P                return;
  s) |, V, f# W! v, g0 F2 ?                }
, A4 i3 H5 @. @; g2 @8 O8 W
: p* `' _% a& C2 d1 e/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
8 y4 u0 {/ ?0 x. d         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
. I' O& ~4 N: A$ ?' ?' V9 b        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

% _8 r3 D# P- X, E; n         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( N# S$ K& {3 S! j. _' D) P        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
4 ~  l- g/ A1 k5 f" q/ r0 x$ o        pokeVariant[1].bstrVal         = itemStr;

/ e; k, d/ ^/ U: T, P; x1 |1 b% m          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
6 Z# I) N& u2 o; P& e7 v        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

4 x, _4 p9 O; n( H5 @6 T8 g. h//        Set the DISPPARAMS structure that holds the variant.
9 @( Z2 E, B( p3 \; I2 j9 v
        dp.rgvarg                                         = pokeVariant;
+ C; \* [  {0 N- Q9 a3 p9 O- {        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
8 a4 O+ o* ?' A& h  d5 V8 C5 x        dp.cNamedArgs                                 = 0;

- A0 `, H7 |1 u% C( B7 x//        Call IDispatch::Invoke()

0 s+ |; Y! {1 B% a9 b        hr = m_pDisp->Invoke(
+ `, N( a# r# ^- H5 m0 K) @                pokeID,
7 ~0 I5 X* s% P$ A                IID_NULL,
2 y$ \" D: o5 S4 j! @  X                LOCALE_SYSTEM_DEFAULT,
, O1 ~8 W/ P1 N3 c8 V& t) Q                DISPATCH_METHOD,
1 J0 o1 g7 w: x! [4 W* {                &dp,
9 a' a; ?! n8 Y$ Z- p! R: h$ ^                NULL,
* P1 N& H' @- I* w                &ei,
  ~. Z" U& f( @/ B                &uiErr);

        SysFreeString(topicStr);
) ~4 s) U2 y0 Y. X2 x        SysFreeString(itemStr);
, W8 p) q" k9 C. e- s- k        SysFreeString(valueStr);
6 z6 P( d, K. _6 t# [( }
1 s+ r( m% s+ a! e: B现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
3 B1 {. D$ K* \) M0 O此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
. _: W4 B' K0 U7 B/ F% S3 D: \7 D) Z

7 T9 q  }5 z3 m2.这是request的程序
6 \+ g% q# d0 n" @//  Request a value from Extend
//
3 ~; a& I2 c5 k( S. K//        Initialize the variant that will hold the BSTR.  Set the variant's
4 k. d- Y( K- `) Z4 E//        type flag to indicate the fact that this variant holds a BSTR. Place the
  k7 v8 E" C+ x% _" b//        BSTR into the variant structure.

7 _/ o5 t( J( m6 ?' X) j  ?        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
1 d9 E! I% x4 M9 V& W. ~         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( P  \- b9 \+ c) }        VariantInit(&requestVariant[0]);
# B$ H1 s4 @' S. j0 S! {: ^0 [( w9 X        requestVariant[0].vt                 = VT_BSTR;
! w/ B+ r5 y! A' \7 }  D9 Z        requestVariant[0].bstrVal         = itemStr;
5 y7 t5 w3 L4 t1 J1 c; K6 Z8 r# t7 \
' }6 K! O8 \! T; Y( _" w          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

2 H& S5 F" K& H: x        dp2.rgvarg                                         = requestVariant;
) M2 l. u* r  x: k5 }* c+ z  e  p0 G        dp2.cArgs                                         = 2;
# d- K4 K1 p4 H9 E8 M/ O        dp2.rgdispidNamedArgs                 = NULL;
+ u0 ]; \' B7 t  ^        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
: D/ Z, b8 e7 K/ Q# k
//        Call IDispatch::Invoke()
9 O% ]1 x$ A) U2 I7 l
        hr = m_pDisp->Invoke(
$ a7 [8 X8 }3 A                requestID,
                IID_NULL,
2 p+ s9 P5 `) i" @# p' \- J6 @                LOCALE_SYSTEM_DEFAULT,
5 x! w0 ~/ g% L  o  A4 r6 u  A                DISPATCH_METHOD,
* v& Q/ A# b8 m" P0 b1 Q7 {                &dp2,
% {. J$ Q5 W7 z. @                &var,
" R1 z" v# T( v: h                &ei,
1 X$ p* G8 B$ j- p2 p1 x& R# d                &uiErr);

2 |# v( ~# l( v. j2 f! z: a# Z+ K8 Q        SysFreeString(topicStr);
        SysFreeString(itemStr);
. V( l9 F+ V' \! h2 S' R* F请问该程序是获得extend里面的哪个值？
8 w& g8 Z+ O) ^9 Y如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？