c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
+ s- o% P0 U; Z2 i4 M                
$ Y( K8 o  O) I2 L3 ~/ W        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
. \) w% N4 M5 m; [) r3 G2 R                &Name,                                        // Array of names to get IDs for
: J7 j+ V( J4 z% X/ Z8 J5 D                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
' d& y% ~) r0 `" X' h# X$ c( p& ]+ y/ c4 l                return;
; ?- f" ?& V3 u  N: s9 X$ u0 m                }
; z: b4 S0 e" A! {' c
! w" @3 }4 |2 g  F/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
( ]% f4 o0 D' n' F$ U5 Z         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
& M5 `& \' c# L: g' r# v* {        pokeVariant[0].bstrVal         = valueStr;
' `7 C' O$ y. E5 e- Y  @
4 y4 h! v- J* x5 V7 Y, @         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
  o9 A% S: `4 T: H3 Y$ ~& B- C        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
$ y! a1 P; H; r, i( T
- j/ M: I2 E/ F- V) {          topicStr                                 = SysAllocString((WCHAR *) L"system");
# ^+ ?" r4 W+ D4 j        VariantInit(&pokeVariant[2]);
9 y/ V% G* {/ N2 p0 L* U$ @        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
4 w& r8 q2 B, ?
- ]1 J3 [$ T- A1 G: h. O7 x//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
) U3 T% A& s  O/ A        dp.cArgs                                         = 3;
7 o8 f" ^2 G* k) F$ f* ^4 ]2 G        dp.rgdispidNamedArgs                 = NULL;
; U% _; R& y) {. W5 a        dp.cNamedArgs                                 = 0;
/ P  l- \/ w$ Z2 E+ c+ c% |$ R, L
//        Call IDispatch::Invoke()

7 f! o: `5 D% w# o, _        hr = m_pDisp->Invoke(
5 W) Q) N2 X% y5 C" @7 q" x                pokeID,
; a) g. L3 S, {$ |) f4 s$ F2 s                IID_NULL,
  @% ?) \# \. a9 q                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
" I0 }# G0 J* ^* B+ V  ]! e' g2 z; j                &dp,
/ H* a$ O& f4 a0 h- I, ^# C                NULL,
                &ei,
                &uiErr);
7 S% o' f: _, ~
        SysFreeString(topicStr);
        SysFreeString(itemStr);
0 |" H5 @/ V% \$ r" m        SysFreeString(valueStr);
6 b4 i3 ~; i1 `: X! |" ^' n, k7 a
) I5 K$ t9 g# e' i8 }  d/ T现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
& A# d/ H5 L0 Q5 w# P此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
* z- I( V2 k1 o; A! m3 ~

% W" O6 ]6 A7 _  c  I2.这是request的程序
& |7 S& O# p* q. h//  Request a value from Extend
//
//        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.
5 _+ b  I! X0 h# f2 S
1 o- j( a$ S* k. ^/ X8 C        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
, N8 M0 t8 [& \8 |, u! k- D       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
2 L& v0 Y' O" _; g+ R& [        VariantInit(&requestVariant[0]);
3 b( y5 _* S& }4 Q' J$ e        requestVariant[0].vt                 = VT_BSTR;
) s. U# x% |, _4 l% d3 k2 y        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
- z& P: S8 D9 w8 t1 p. q        VariantInit(&requestVariant[1]);
* b8 |* V2 D$ b        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
' P& z" E* ?6 _/ j  w
2 d3 C6 j" b6 ~/ w1 h//        Set the DISPPARAMS structure that holds the variant.

" L0 V+ R9 s# s3 O  R, w        dp2.rgvarg                                         = requestVariant;
' V) ~3 h4 @+ P% e. g& z" U        dp2.cArgs                                         = 2;
1 Z# Q! f# L; x' ]        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
) H7 Q  |7 ]8 L" v  S' ]% C# y) c3 D
; W: z) Q" Y8 J( ?9 A//        Call IDispatch::Invoke()
9 s1 r& ]- a* u; Z4 P; F
9 v0 I% e" v$ l4 _! m4 j0 p        hr = m_pDisp->Invoke(
                requestID,
+ Z8 U2 [* I' L3 K9 |                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
7 D+ T* h0 m# E7 j                DISPATCH_METHOD,
                &dp2,
6 l4 e' r* ]& {  v: c+ m                &var,
                &ei,
% a9 I8 [5 A" T                &uiErr);

: e0 X4 @# j( F! m, d6 k, \        SysFreeString(topicStr);
        SysFreeString(itemStr);
* J9 X6 H. T; n) d+ e请问该程序是获得extend里面的哪个值？
' X6 Q4 p9 y, X3 }3 W& x如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？