c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
% W+ _( H7 Y: Y1 s  G! ?Name = (WCHAR *) L"Poke";
' b% A) U8 M( d4 i% z9 R: R                
% m$ B( G2 d. D  \" y% G& Z        hr = m_pDisp->GetIDsOfNames (
$ i$ p: V$ l. L3 z- i, {( W& m3 X                IID_NULL,                                // reserved
; \( S- X" W/ X# v1 @: k                &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)
9 x* W+ M4 ~# C  g5 P, X5 Y                {
2 t& x6 l" i: E& y. _; H                MessageBox ("Get Poke Unsuccessful");
; |: ~1 E  `  J1 o                return;
                }

/**************************传递数据给extend**************************************/
6 G' ]8 L/ r' Z! q$ N. D5 k        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
: Y! Q. j0 k8 f7 r; |# X% F         valueStr                                 = SysAllocString((WCHAR *) L"1232");
( e3 _/ ?! j7 `5 Q! N        VariantInit(&pokeVariant[0]);
3 M7 |/ d. D- w* e        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

/ ?9 g0 K" _! c$ c         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
* j5 }, G: L: ]3 n, L1 ^        VariantInit(&pokeVariant[1]);
3 i) ^1 R$ j( J5 w8 A! J        pokeVariant[1].vt                 = VT_BSTR;
( f9 T# d6 ], r& a        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
0 ^! q$ d, |4 ^$ S        pokeVariant[2].bstrVal         = topicStr;
* o2 u; A0 K$ Y4 s
$ b, X7 ?' \7 P: y; T/ ?+ b$ n//        Set the DISPPARAMS structure that holds the variant.
+ M2 k! r% P+ m6 R/ Y1 Y6 D7 ]
        dp.rgvarg                                         = pokeVariant;
4 }) x6 H' f1 s        dp.cArgs                                         = 3;
" R0 B0 y% S0 D$ e        dp.rgdispidNamedArgs                 = NULL;
: A0 y. Z- \0 f5 F, C        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                pokeID,
9 H# W0 @) s0 q  m                IID_NULL,
3 d/ e) Q/ f& }* A9 e3 h" O                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
% V& e& I. j8 B/ x3 i, s4 l$ y8 Y                &dp,
' Z$ [* o) \$ }# J& r                NULL,
                &ei,
+ ^; D+ O0 `  l  n5 P/ c                &uiErr);
, \8 T, k! L4 B, w& x4 M( }
, E5 ~2 T6 }$ T; s, [5 n        SysFreeString(topicStr);
: x! e7 B9 |6 Y& ?* \# h# V% t, d        SysFreeString(itemStr);
  y3 J( U6 z" |" L7 g$ {3 q; d        SysFreeString(valueStr);
* x" H3 ]9 y/ p. y9 u/ R) l
) g6 n7 ?' f9 L1 _7 s6 [现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
' n/ B7 s  y, z3 u: I此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
5 _3 x. w& ~7 u3 R, l+ d

2.这是request的程序
4 u  _, A- u& Z9 ^8 q$ f//  Request a value from Extend
//
9 l% [. e7 N" |( e. a3 ]* R( R//        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.
: k0 v& D/ c+ S0 V
" g- }, O, |2 t7 ~+ w5 C0 m1 v        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
# Y" l/ n7 Y0 Y6 w) W3 z7 c       
" @' o" i4 i, Z8 b         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
4 q, x9 F3 Q; f' i        VariantInit(&requestVariant[0]);
7 P: E, v! l2 c: m+ C        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
0 b" v) o$ R# ?% z% O3 q* M        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
3 k8 R8 ^; p% s        requestVariant[1].bstrVal         = topicStr;
' X3 a/ K7 q" W3 s! X( o' ^
- ~* o. E1 C! ?( }' K8 }//        Set the DISPPARAMS structure that holds the variant.
" |) u6 @% p( T8 {6 e
        dp2.rgvarg                                         = requestVariant;
3 V" f( }/ J  h  F        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
5 o+ Y7 Z4 q1 Q9 r+ l
. G5 ~& h  O; ^) B/ e7 @         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
# ]+ ~1 f, Z4 h0 S) {                requestID,
% t* \) O& ]# A1 q5 F1 r                IID_NULL,
" H# q/ w. I3 G                LOCALE_SYSTEM_DEFAULT,
. e' e4 l  s$ T! Q7 q- b+ H: Q                DISPATCH_METHOD,
                &dp2,
                &var,
2 _) l+ P9 R- [6 x$ h/ `                &ei,
                &uiErr);
# f- L/ \: r& m) Z" i! W3 k* P, M
        SysFreeString(topicStr);
        SysFreeString(itemStr);
9 w8 h4 K& E$ t- Q  S  I请问该程序是获得extend里面的哪个值？
; f" l7 d" k' |# |如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？