c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
  Z" w' _9 {% L% U3 {        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
* o' _4 I/ s# Q1 j5 P' I/ J0 Y                &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)
( f3 @7 O4 b1 Y+ |( h                {
                MessageBox ("Get Poke Unsuccessful");
9 Q& y6 Q& ?  A4 w9 ^                return;
4 Q- h  T/ r. `1 @+ C) k                }

6 o, b( h% P( Z, u- ~- k/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
. R/ m5 |& K+ T9 c( Z4 g        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
4 x* `9 d  ]9 l1 w
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
+ T# l1 I/ j; u# S! c. ?2 J3 z/ g# ^        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
3 D$ @0 f5 M8 r( t+ t) S4 o7 R7 K        pokeVariant[1].bstrVal         = itemStr;

6 {8 j7 l$ @" P9 _% b$ V; Y2 H, C          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
0 M( y2 z7 e3 R1 X- H& _        pokeVariant[2].bstrVal         = topicStr;
7 l, I) j% K2 J2 z1 u0 W
//        Set the DISPPARAMS structure that holds the variant.
1 b! Y) f8 v3 \
        dp.rgvarg                                         = pokeVariant;
  l! I+ B3 e& c' c# V        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

3 k0 L* }7 j* S( K. B- q0 R% D//        Call IDispatch::Invoke()
' A' g0 N! Q  R. f# U- u
        hr = m_pDisp->Invoke(
                pokeID,
. {1 r6 r, s, p; W9 r                IID_NULL,
9 z( }4 {" q  K% L' t. C/ e                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
( H1 W5 G% U, Y4 o& O                NULL,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
/ P5 i" Q! o7 b# R6 l2 X$ T) o        SysFreeString(itemStr);
        SysFreeString(valueStr);
6 ~3 s- V( r& R, ?0 K2 x1 n# X6 {
9 \6 k3 U' N2 n8 G现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
; n9 o0 Y) k3 A0 a6 i( x此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
$ p! q2 Q# n$ y4 F' ?5 A+ T0 T2 d
7 e* k0 s& q# o& a5 U! L( L  Q0 {
2.这是request的程序
3 f) c, \& H* w//  Request a value from Extend
0 j  Y$ q% H, P9 ]6 A! v4 d5 ~) h//
//        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
' p3 \  [8 N1 C( C) D//        BSTR into the variant structure.
- K6 |9 ?8 u' }! h) L/ t# }: I7 W! N
: G3 N: u8 F# }8 X        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
' U. h' N5 m% v* `" T        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
) v0 k! T/ f1 T6 |4 ?        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
. J- a' P8 u2 `/ H        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
* A/ F/ ]" ]- O9 Z
7 ]3 L5 c$ w5 w7 D1 z! T. m//        Set the DISPPARAMS structure that holds the variant.

! w  N; a4 p" x0 J( g% A9 Z        dp2.rgvarg                                         = requestVariant;
9 H7 q) F1 @6 \4 ?7 J# t3 ~! ]        dp2.cArgs                                         = 2;
: ]3 E, ]3 B/ y9 F' H0 F        dp2.rgdispidNamedArgs                 = NULL;
( I! k4 F7 X8 w& t2 U! i& V) F        dp2.cNamedArgs                                 = 0;
0 S% |7 T  S# `+ x7 d
        var.vt = VT_EMPTY;

1 m: g) w# L1 w. b+ I0 m; T3 Q//        Call IDispatch::Invoke()
# A( c  v1 M3 H4 o
' x) l+ o0 S# M1 j% \, [        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
/ x' o- E" X, ]4 L. E8 S                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
$ W# I) ~1 F0 y! c4 B                &dp2,
                &var,
* F# r: W( W4 R9 b7 {" g# X                &ei,
3 f  w8 w" P1 S0 z) x) o7 @0 l                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
. z" b: G* M5 i5 k. a如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？