c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
+ s0 {- C3 m6 A& a                
8 N3 Y' M( Y& j. J        hr = m_pDisp->GetIDsOfNames (
/ d" S$ Q1 q# E* X/ o0 E" P                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
  ?6 f* F, p" n6 h                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
! i+ d5 x. C% P        if (hr)
                {
( [5 c& ^# P% I) ~# u# p                MessageBox ("Get Poke Unsuccessful");
/ a* {+ {" v, K1 I                return;
7 ~$ d+ c$ v  u% e2 S- X0 z                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
) W0 u& y- @6 X, F       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
0 F& T( @& C& T        VariantInit(&pokeVariant[0]);
8 h+ x3 Q% x. R% Q* }        pokeVariant[0].vt                 = VT_BSTR;
& U. c/ p4 K0 M5 w, H        pokeVariant[0].bstrVal         = valueStr;
- M- c; i; T" ^( s; u6 Z) h. D
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
+ S# n) g# `& [" C$ F        pokeVariant[1].bstrVal         = itemStr;

" M- ~) i: H( T; E5 c- L8 e  k          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
4 p# N. P. z: T  l; K
//        Set the DISPPARAMS structure that holds the variant.
2 f4 X# r" S" l
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
$ u  Y' _- e* p, c- F        dp.rgdispidNamedArgs                 = NULL;
3 r3 M! W3 i; K        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
1 R0 L, S& l% R' m1 r3 F
- E: ]  w: T1 H2 e) H        hr = m_pDisp->Invoke(
( U) B0 d' [& A" t! N4 J                pokeID,
+ i+ H- a0 h+ _9 q! F. q                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
3 _) t; F4 u$ R* t9 A                &dp,
                NULL,
: x6 M5 V1 N2 A; ^2 h8 x                &ei,
                &uiErr);

        SysFreeString(topicStr);
  [: }! ?: ~0 }7 m9 t1 f2 j9 P        SysFreeString(itemStr);
2 M' }! S5 ]" X$ A" o        SysFreeString(valueStr);
+ w9 S0 T: T/ A% B* j
- i6 J/ S) y3 ?3 g# N现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
! _  p+ |+ l5 W- ~) l此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
//  Request a value from Extend
//
1 L- H4 a% [1 W; A//        Initialize the variant that will hold the BSTR.  Set the variant's
+ o# l5 ]4 H9 @: Q/ H( {//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
: S8 u- w# V$ a0 |( J        requestVariant[0].vt                 = VT_BSTR;
. c; Q1 b1 O) D3 B) }: i        requestVariant[0].bstrVal         = itemStr;
" w. q! B6 ]) k& m0 E9 S
          topicStr                                         = SysAllocString((WCHAR *) L"system");
+ @" W( _6 `- I6 w1 ~" f        VariantInit(&requestVariant[1]);
- [* k8 Q" r: {2 M        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
; C& q8 A$ |1 t7 `- U8 j8 v4 C  j5 ^9 F
/ R5 ^. I; Q8 c6 g# w//        Set the DISPPARAMS structure that holds the variant.
/ u6 Z& ]7 m) m) g9 U9 o5 `4 A
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
! u& d6 A7 \& W4 B; s2 P$ M        dp2.cNamedArgs                                 = 0;

3 N- @0 I: l9 \& x. b& l( [         var.vt = VT_EMPTY;

9 S7 X6 l; _$ @; M: n/ n//        Call IDispatch::Invoke()
& r9 q/ X# s9 p/ S6 r" i9 r6 d/ j6 F
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
: g+ \* J- \6 [( _: `                &dp2,
                &var,
                &ei,
% n* h, @7 V- q& U2 X3 {7 O" V, W; j                &uiErr);

- Z1 E4 o, N" v        SysFreeString(topicStr);
3 z+ s, t2 D* ^; _9 y        SysFreeString(itemStr);
& r. l, H* Q3 H# \, I3 i' z4 F请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？