c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
6 m8 n! k& X- ]" ]                
, _# f2 j# [& Y( f( ^5 H: P        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
7 H) Y8 y! K& E; K2 n, Z                &Name,                                        // Array of names to get IDs for
% @- \: P. y6 u2 M  Y7 W                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
6 `8 [  j0 y- Y2 A% c                       
  G/ k" P0 c" @* ]5 D8 K  L        if (hr)
2 s. n2 E' ~$ N/ S$ E2 Y) @                {
                MessageBox ("Get Poke Unsuccessful");
                return;
4 }) Z1 ~7 Y) ]* c% q: G7 S                }
9 `! u" N- P& F% a1 q
4 m2 f! W& o: o* W6 H/**************************传递数据给extend**************************************/
+ f8 P5 ~( D! t: h6 m        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
; V, l3 y- ?, U6 d! ?% X) s# |         valueStr                                 = SysAllocString((WCHAR *) L"1232");
# Y4 [& }: `- a1 ]' ?        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
- G( t( ?2 ~, J  q# j- Q. [/ u- P: R
# v6 s2 w) z  \         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
3 ~$ P: H5 m! d$ R+ J' i0 b        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
5 U, v* c4 m0 p; N, X6 F  z% z        pokeVariant[1].bstrVal         = itemStr;
; f. e) n0 T# \# m
$ u0 B5 Y! \: V: [( V          topicStr                                 = SysAllocString((WCHAR *) L"system");
- h8 X3 A" a- t  N        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

3 t( ^$ p7 ]: G+ b( @//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
3 _: t0 _" I, ^3 }( {1 D1 B        dp.cArgs                                         = 3;
% ]2 @, u0 B9 p' E" a) k1 K0 I        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
& h3 f2 s: G# c/ V( x# e# [: |
; b( W0 i( [) m        hr = m_pDisp->Invoke(
                pokeID,
" n$ I7 X7 {$ g7 Q                IID_NULL,
# }! d( _2 Z: s+ H- y3 `: Y; s                LOCALE_SYSTEM_DEFAULT,
  \. j/ _4 L4 g                DISPATCH_METHOD,
8 K& m* w+ J" g% W! B                &dp,
) J4 ~4 M6 x, f$ o/ s2 I* L                NULL,
7 P& U5 [! ~$ `                &ei,
                &uiErr);
- s! i# E/ h2 E3 ]+ K3 M
        SysFreeString(topicStr);
2 F% [( ^% \. Z  J* X8 C        SysFreeString(itemStr);
) W$ B' O5 E8 ]0 e        SysFreeString(valueStr);
4 `2 u: Y8 X5 R7 `3 u1 P& {
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
' R+ k$ z% I" Q0 }1 `此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


7 m5 D( ^& \5 C4 [2.这是request的程序
5 t; C$ Y+ ]$ n: J+ B//  Request a value from Extend
2 o$ B' L7 T2 O+ J! N$ C//
* ^3 U$ G7 a+ j( j! D//        Initialize the variant that will hold the BSTR.  Set the variant's
# b8 _. U% T+ g$ l2 p: @& M//        type flag to indicate the fact that this variant holds a BSTR. Place the
' f; o4 Z8 ~; \: c* Q3 t9 t) e//        BSTR into the variant structure.
, n1 |" j- r% \0 b
: I* t2 \5 y* G$ B* Q( X& ]        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
3 l/ e6 w$ Z  w4 b       
* a& q( U9 b; V7 B: o) N         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 f( C8 z; K' j* q( r% y' A        VariantInit(&requestVariant[0]);
# P7 V6 G" R0 ?# S- f0 f        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
4 }9 F& y5 j" g9 ^- m$ Q        VariantInit(&requestVariant[1]);
! Q# ~" x- e# t' F        requestVariant[1].vt                 = VT_BSTR;
' e# X( `$ H; n: Z        requestVariant[1].bstrVal         = topicStr;

" b% J9 u" ^$ |6 c' I  V. Q//        Set the DISPPARAMS structure that holds the variant.
6 R3 W% M4 s' t: A2 W% J1 X
( a  i2 c5 z3 O/ j, O        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
$ U+ a, ~$ o7 ~5 R. R' Z! K
//        Call IDispatch::Invoke()
4 Y. n" ^0 B7 H* b7 ]2 `
        hr = m_pDisp->Invoke(
                requestID,
# }8 \- H" g4 Q! h6 |* p6 I                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
* x6 l2 k# ^1 O: p+ O3 p* _                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
) F& S4 c0 C% C7 l: [# ^# s' @                &uiErr);

! o' F; \. C# l7 k5 k+ c, [        SysFreeString(topicStr);
0 P2 x5 E6 o& s        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？