c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
: ^6 Q6 x8 ]& s- x$ rName = (WCHAR *) L"Poke";
                
, _0 b& J2 ~: `1 F% U& b, q        hr = m_pDisp->GetIDsOfNames (
4 K* _1 @+ r$ |+ S% ]                IID_NULL,                                // reserved
0 j- n2 Y+ ~, m3 A; j                &Name,                                        // Array of names to get IDs for
; _% W7 q% `! B% Z. R0 t$ o4 r                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
. \3 N) O- i/ ~" Z3 K- P; U! v                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
) h) x2 E7 g1 A7 X                return;
+ s! B* N2 C5 u, _9 M4 l                }

* R/ r8 j6 V+ q0 a$ `* m7 w/**************************传递数据给extend**************************************/
9 n( ?* u9 @4 P& h. Y" y8 j5 X( ^        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
4 ?9 k7 J) w* X7 a# W& u3 b/ u        VariantInit(&pokeVariant[0]);
. }) n# @# d0 E$ s6 @& j* G/ q        pokeVariant[0].vt                 = VT_BSTR;
6 J# K3 E0 O6 G& F# f) m        pokeVariant[0].bstrVal         = valueStr;

8 n& g. B; }1 |8 b9 _  M1 w4 T! m6 Z         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
, [+ D; V% b) @: r3 r- m( B  X4 _        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
' Z' L. ^" ~( ?6 C        pokeVariant[1].bstrVal         = itemStr;
# |: M+ _- u4 e& K# K, K8 ?
/ h% z1 P( O* q; T8 l2 C          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
# R5 p- o$ W* b, b( w        pokeVariant[2].vt                 = VT_BSTR;
3 L! u2 J0 o1 E" V: S7 F# L        pokeVariant[2].bstrVal         = topicStr;
/ x$ b3 q& Q/ y! F' H. m
" Y7 D6 L9 ~1 w//        Set the DISPPARAMS structure that holds the variant.

& F8 Y5 T3 [; d- h2 a        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
/ M# N+ S& p% [        dp.cNamedArgs                                 = 0;
& \7 {2 [- E3 Q/ V( E$ T
, C  L* ^4 Q" o) w//        Call IDispatch::Invoke()

7 u* Y2 W8 _* s( B1 t        hr = m_pDisp->Invoke(
* {3 U4 c! e! i7 S) L                pokeID,
3 h0 E5 N: |# V+ {0 t/ {                IID_NULL,
, ?2 R! W% p6 |4 }9 E5 ^                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
# N( G) ~- w7 M                &dp,
% O; f$ Y8 C0 l+ O* T$ R8 e- M0 r                NULL,
                &ei,
/ d( l/ G' a& @" k4 Z                &uiErr);

$ }( \/ m' u* U: n) Q$ L        SysFreeString(topicStr);
; y2 a+ U8 {/ z' T8 f        SysFreeString(itemStr);
! F9 I* p8 h8 ]7 P+ o, v6 }        SysFreeString(valueStr);
/ m" B( J: ?; r( y0 c; W( p
$ j7 W$ r6 `+ D9 B现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
  Q( Q7 p5 b% J9 I; W此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


, H6 g- t7 A5 N2.这是request的程序
//  Request a value from Extend
: ]1 K. f: K) j2 s/ x//
//        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.

  J: i9 I7 j# o  q1 s/ A/ M        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
7 F  N7 [) J9 W( G5 R( L       
$ ]; Q2 e( e9 i  G$ L, P; W         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
/ e' S  e  A: U3 @- P( \- P        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

- S5 q8 }0 n; G          topicStr                                         = SysAllocString((WCHAR *) L"system");
; x; n) C: c  N6 Y% s) }& ]' P+ b        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
; i, \" h* ^8 u# h! }$ v0 y        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

) e  P9 u4 r- x# {% c        dp2.rgvarg                                         = requestVariant;
) o3 b% L7 P- r0 W+ {        dp2.cArgs                                         = 2;
9 U; _5 }1 I  ~$ v        dp2.rgdispidNamedArgs                 = NULL;
8 {+ p. i+ X% r& x        dp2.cNamedArgs                                 = 0;
  L& I: r1 ~4 M7 F5 a7 A' q
2 j0 G' F5 B( \! `! b9 @         var.vt = VT_EMPTY;
1 b/ [% F: y  e! C+ h7 i5 n
; T' h/ ]6 }0 n+ h//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
+ T/ I& J2 o# c( ]9 W- T; R                requestID,
/ }9 f* p7 k2 E& C0 Y( O, L) H+ a                IID_NULL,
! N$ O+ Q$ f* D& w# q                LOCALE_SYSTEM_DEFAULT,
" U+ j& k. y8 V0 S                DISPATCH_METHOD,
+ A1 F- r2 z- W3 C                &dp2,
9 k0 W0 L; _) B0 K7 n4 t                &var,
4 B. ?1 E1 o' _# D% T4 S                &ei,
2 ^" x: f/ T' O. q& l                &uiErr);

        SysFreeString(topicStr);
5 d. }: ^- }4 O, ~1 J8 K        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
& a2 F7 [' O6 L2 ?' [5 o如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？