c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
9 Z7 ?# r( N& N% U* ]        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
6 @1 X* `5 u9 s# I! z7 m) j                1,                                        // # of names in the array
& K7 A0 h' v+ |" E, J3 d: c                LOCALE_SYSTEM_DEFAULT,        // System locale
$ w7 H* @3 w, {, Q4 Y4 D                &pokeID);                                // Array of IDs to fill on output
                       
& Z: V( x! E2 t/ x6 F. a        if (hr)
6 }" _; X$ m! z3 ?3 H- r                {
                MessageBox ("Get Poke Unsuccessful");
                return;
9 G1 _' |7 m' Q: H5 L1 ^                }
( k5 d2 b6 j9 u- p$ [) \+ ?
. K2 X2 r- Y; A7 g( M2 E/**************************传递数据给extend**************************************/
# W4 [1 ^. p+ l% d' A  o        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
" Q0 _9 H3 X: `2 _8 G& V        VariantInit(&pokeVariant[0]);
% A8 c# [; g) r9 `5 R        pokeVariant[0].vt                 = VT_BSTR;
4 x7 J# |' Z. s# |        pokeVariant[0].bstrVal         = valueStr;
! ~5 r# Z- H; F" j. R0 q9 \, n
2 U6 k( u9 @6 _7 y# ^         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- i9 B- D5 D7 A; v9 U4 k        VariantInit(&pokeVariant[1]);
0 U2 A3 d! Z* d7 n) V        pokeVariant[1].vt                 = VT_BSTR;
$ t, {7 ~: z- O- e        pokeVariant[1].bstrVal         = itemStr;
9 N. Z/ j' e1 V2 h- b6 m
2 B1 \0 ^5 M2 ]1 m$ w; V7 I          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
8 ^6 Y8 R2 P4 K# T2 O0 R1 ]& N        pokeVariant[2].bstrVal         = topicStr;
$ X4 H3 B4 w1 Q  r' G3 F1 \# T
0 F$ B1 c8 b% |( |//        Set the DISPPARAMS structure that holds the variant.
3 G8 n( \$ \( Z2 f- o, s- a2 b
( |) @$ D, ^! ?+ l  d5 ^        dp.rgvarg                                         = pokeVariant;
% l5 r8 F- Z/ A' P  o  J        dp.cArgs                                         = 3;
$ G) i# l6 m' }: L0 ^# {        dp.rgdispidNamedArgs                 = NULL;
" ~' I% j; H, i2 x( ~3 r1 }        dp.cNamedArgs                                 = 0;
; J: {& I3 c% k- p$ g" R# B
//        Call IDispatch::Invoke()
$ c+ l/ L6 X8 M! ]
        hr = m_pDisp->Invoke(
                pokeID,
5 z! @2 C' ?) b7 z                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
+ S5 y& \) }5 ]1 V; Y+ ~                DISPATCH_METHOD,
2 Y2 r: P+ g& a- z2 U$ I3 a: T4 G                &dp,
) h) q( Z$ G; X! i                NULL,
, x) m2 j5 T2 \! t6 {1 Y4 w8 C                &ei,
+ ~0 r. g' ~% d! ~                &uiErr);
7 a3 K. l. S+ b) u5 V4 {( e8 o
        SysFreeString(topicStr);
5 Z  ~2 l! l* k$ O& b' L& U        SysFreeString(itemStr);
) a  ]! j2 ]. p6 a0 \: E        SysFreeString(valueStr);
. @0 k6 d6 T5 g. |. {
# }! d$ ^# d# h5 i现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
" c$ Z/ W( r! t  X
' U  e9 Z/ {& |1 \( c0 |- N
4 E6 {' F( @5 e. t9 L+ g2.这是request的程序
//  Request a value from Extend
" z/ b, J1 G% \3 v( U//
7 O; w5 M9 `* y: e//        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
' z3 W/ u- W) @( |3 }//        BSTR into the variant structure.
; Z. k5 u8 H  S2 L
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
% L/ r$ a, s, N/ m8 f2 J2 u       
/ e! X6 T' V8 t  i         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
" v+ P: w9 ]# m8 a2 @        requestVariant[0].bstrVal         = itemStr;

5 [% B$ c7 d! T          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
/ I4 z2 T* O- P" H        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

" \! ~( e. Q7 ~' z1 }" q//        Call IDispatch::Invoke()
$ M# l( [4 H: Q7 \  \% W  r( ?# o" N
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
( F8 v  i0 ^- f# s% _, I* V                LOCALE_SYSTEM_DEFAULT,
" t- S! O' Y8 h8 \; ?/ m# Y5 r" l                DISPATCH_METHOD,
$ H3 n1 C; D+ M  L% O                &dp2,
9 m. y. K% V0 x" Z                &var,
% u% k0 S: j* X( h+ ?" D                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
6 c2 j3 H4 O5 r; A' M5 x1 w) e如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？