c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
% ~6 m( {' F$ T  KName = (WCHAR *) L"Poke";
. b# [; ]7 U* }6 C; j                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
( r. Q6 @3 w* x, N                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
8 F9 i7 _/ ]$ |3 q. E  Z2 T' L( h                MessageBox ("Get Poke Unsuccessful");
- x* S* U6 o) J" R                return;
; u: S) d: Q( v. x8 t) e& b, w                }

/ Z) k" ?* c) o9 P' X7 w" r  J! b/**************************传递数据给extend**************************************/
" ]( M3 S4 `: F& j; t4 s& t& Y2 k" e+ Y        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
. S& T6 e6 l; j  R/ P5 R         valueStr                                 = SysAllocString((WCHAR *) L"1232");
/ m) z/ L! F4 Y( _. z        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
; i3 }4 L% ~# R+ `( U! K        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
5 [6 p5 g! R# ^7 ]        pokeVariant[1].bstrVal         = itemStr;
- @# s3 c& l" ]$ {
+ ~8 H" D9 ~5 I: A- t          topicStr                                 = SysAllocString((WCHAR *) L"system");
; }* M! [. u' R5 v        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
3 L- _9 v4 x0 \! k  |9 v        pokeVariant[2].bstrVal         = topicStr;
5 z# [0 s3 t/ L
8 I, L: i1 t6 a4 d0 n//        Set the DISPPARAMS structure that holds the variant.
/ m2 E" H7 f6 R. F
7 |' s" u' g) C$ C& J) S# @        dp.rgvarg                                         = pokeVariant;
$ o/ R% @# T( [6 _        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
1 P& M& r: {3 @  |2 I
) `; ^/ f$ m0 A//        Call IDispatch::Invoke()

8 ^2 i" n! H* T% x        hr = m_pDisp->Invoke(
! e; @; W+ G' ~1 g3 M' N                pokeID,
7 ]$ }; q( }2 Z- }5 [# F7 g: O                IID_NULL,
: d% p) ~& \( S                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
# ^/ V& W: ]  V- E                &dp,
3 ]& v  Q  @  U                NULL,
3 A" H$ K7 x& {                &ei,
$ `/ Y1 F1 e# |4 [1 h% A4 s0 P                &uiErr);
9 h+ c+ P/ k) d4 I5 @2 Z
% h! e' S6 b3 ]; V$ y' |7 L- q        SysFreeString(topicStr);
3 z+ H% ~# C7 c$ y# F  @        SysFreeString(itemStr);
        SysFreeString(valueStr);
6 O* }  E# o4 S+ a$ S) ~! T" Q
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
. Y) [" l4 m; k+ e9 a此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
) k3 v/ M4 Y. r. ~' I//  Request a value from Extend
8 [( h. E! C, L0 y4 s//
' J. L% E. ]+ ]1 O( |, d4 ~//        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.
# I0 d+ \* M" w
! K! x# F& Q2 \' c9 B1 i1 c        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
. G3 [1 s: [3 |0 k7 }1 v       
& d( }2 a' Y2 T+ ~( O* N$ M         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 E# E6 _$ O& z2 W1 t5 {5 D4 j        VariantInit(&requestVariant[0]);
4 F* z6 v* n* I' J        requestVariant[0].vt                 = VT_BSTR;
1 G1 H& f/ E1 ~        requestVariant[0].bstrVal         = itemStr;
0 W; P  r# C: ?5 `
9 b& P( O  L7 U; {2 Z          topicStr                                         = SysAllocString((WCHAR *) L"system");
  ^0 a( ~# Q* [) n( U2 n' Q        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
+ O' b; I+ v4 L1 X8 I' _        requestVariant[1].bstrVal         = topicStr;
7 y' q7 Q4 {1 }/ Q3 C8 d# `
//        Set the DISPPARAMS structure that holds the variant.

  S( c0 @# Y; l  V$ G1 c, R        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

8 j  a) i/ v; w5 H( ?2 m+ x        hr = m_pDisp->Invoke(
                requestID,
& C7 `! @; r9 Y- g8 r                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
' H$ y/ A* e& t, e' v# H6 u                DISPATCH_METHOD,
, \# ^, H& Z  w2 R/ q8 e                &dp2,
                &var,
                &ei,
* j; t4 x1 [* t! t* _4 N8 n7 B' O                &uiErr);
" V  ]) I& P6 U. c9 l7 |# [9 a* [1 Q
        SysFreeString(topicStr);
: ~* ^( m& d. L  M, l2 Z/ z        SysFreeString(itemStr);
' f+ {. q1 S+ q. I请问该程序是获得extend里面的哪个值？
( M& W, B) {: l如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？