c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
/ H/ ]: o- ?8 _7 ?. LName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
5 G, d# l# F+ l                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
; p. o3 o% G. b5 k                1,                                        // # of names in the array
/ R6 u; v! f. G7 ]" T                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
+ s; Z1 @! Q; r) B6 x                       
        if (hr)
" V& D! W" F( }                {
  Z9 h* w. m4 F) @6 ^9 N8 }* x                MessageBox ("Get Poke Unsuccessful");
                return;
                }
1 ^7 y( O3 b7 i1 y
- f; }) B$ ^, O& {! z+ F/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
4 C6 d4 K' m+ m6 f4 Q# D6 C2 [        VariantInit(&pokeVariant[0]);
/ q! e. y3 z  J5 f! u' I        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
7 R% q: w, V. J
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
9 G9 l" C; m! K" p& p        pokeVariant[1].vt                 = VT_BSTR;
9 a. \2 B: u; s; u: U8 A3 @        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
2 G( a( e: }* r* `- }        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
4 D  H% q1 N* z( d* o- w  M9 e0 S
//        Set the DISPPARAMS structure that holds the variant.

3 V! l2 x+ p* h" F1 ?' i$ ^        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
. f  e, O+ V$ N* F        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

* ?) V( D- b" q3 X4 W$ K6 e7 P        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
: W% I) r) [7 K* j( l" u% g  m                DISPATCH_METHOD,
                &dp,
% y9 r$ C& g. W+ b# C  u$ z+ h& A                NULL,
                &ei,
                &uiErr);
8 f" `- L4 |% W
! S+ {2 {7 F* u        SysFreeString(topicStr);
: t9 q$ R3 _2 A: R, d2 z        SysFreeString(itemStr);
        SysFreeString(valueStr);
& q# k/ U% L# A  F7 A. `
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
+ \# [( J; J9 ^+ j/ y2 _- @此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

1 w" l- r: S9 x$ D
; j, z6 e" Q0 e/ X* h- a# s2.这是request的程序
" b2 ?5 r; N  V7 I. F: \; m//  Request a value from Extend
5 a- z0 d- t& o5 x3 L) y* h3 ~. p( a//
3 ^2 B, U' x, V* f, l& j/ U//        Initialize the variant that will hold the BSTR.  Set the variant's
# m  G% j2 w8 _  V2 q//        type flag to indicate the fact that this variant holds a BSTR. Place the
$ S# S. `) E2 U# x. B3 S//        BSTR into the variant structure.
: Z5 w4 I5 O2 L- q3 M) n# C$ C8 O$ x
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
9 d. \( o2 }8 ~% \- Q2 ?* {        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
" T; f/ a) P- _  m& F& r0 o# Q
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
& m$ ]& @$ l" y: H: S" n        requestVariant[1].bstrVal         = topicStr;

! d, I; P6 P/ x* }0 B//        Set the DISPPARAMS structure that holds the variant.

8 Z$ i) w2 h* Y        dp2.rgvarg                                         = requestVariant;
+ M; P8 ^' U2 D; v        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

* W3 f# U5 E  V# v! u/ M9 a9 [/ v/ i         var.vt = VT_EMPTY;

& E! w( [) W9 q# L4 U' i0 X//        Call IDispatch::Invoke()

, x; j( @) P' s# p, a3 \        hr = m_pDisp->Invoke(
                requestID,
+ s- v6 y1 M3 w& P                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
4 X8 \) [' q6 E6 t                &var,
+ @. r* l0 i! r. }7 \                &ei,
4 n2 v2 n- J$ g% N. q( U                &uiErr);
  |+ w1 |! N. O/ ?; W7 f6 t& a
        SysFreeString(topicStr);
/ n3 M8 D( D! I% {' k        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？