c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
" R9 `& H4 s' n+ u/ D                1,                                        // # of names in the array
+ Z" N% F3 ]- L2 m                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
1 z" g1 H3 }1 [% u: p; C/ m                {
# g" r! E" W& P3 N4 W* w  B- z                MessageBox ("Get Poke Unsuccessful");
                return;
                }

. v+ V7 _! c" |, B/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
; a3 r& L, Z+ c7 ~6 [4 p6 G         valueStr                                 = SysAllocString((WCHAR *) L"1232");
, W( w& H8 O; [; b& e; p& _* I        VariantInit(&pokeVariant[0]);
( p9 m& U2 Y* Z6 h4 g        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
% {1 A: @. d4 @
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
  E$ C/ j" S, H        VariantInit(&pokeVariant[1]);
2 x8 a; x. ?3 T1 [& K$ a6 C) _2 M        pokeVariant[1].vt                 = VT_BSTR;
8 q# T' h" [& R% ?  M7 b3 c) C* e8 h3 |        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
* Y, p& v6 Q. Y$ O( `* K% T        pokeVariant[2].bstrVal         = topicStr;
8 I2 w1 m6 Q& O7 ?3 k+ N' h" @
//        Set the DISPPARAMS structure that holds the variant.
# j# q2 H, ?" D; Q
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

* m" H+ A% h0 |" w1 |6 A4 T. e//        Call IDispatch::Invoke()

/ H& Q. f" F- a        hr = m_pDisp->Invoke(
& a( b  e3 X' D- v. p) S, l                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
1 C! y' Q. m& ^9 f1 ]% M                &dp,
, c4 I: a+ S$ j& l) g2 v                NULL,
: s- K" B7 o/ P3 |  N2 o$ e5 u                &ei,
4 {2 e0 C- a( q' d# H8 l8 A3 a, k                &uiErr);

        SysFreeString(topicStr);
. g, |+ K) O. I% P8 `* u        SysFreeString(itemStr);
; a4 p7 D: m' R+ }! x        SysFreeString(valueStr);
/ u" M! f: `8 [# D. M
2 z) b# Y0 ]: F. o现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
3 A( N7 U  O7 I, N此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
4 c& t# j: v* P+ B6 ?1 f

' Z5 h( _+ U# V1 u* I4 Y; k2.这是request的程序
& n4 {! ?- u4 S! a" e//  Request a value from Extend
//
//        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.

6 `! ]  Y% l) h7 g4 v' G6 Z) g        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
' r& Y; x7 h  C0 d2 ~+ r        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
2 a# u2 f) Q# R* [1 r' `( C
/ i, t: S- \3 f; Y" B          topicStr                                         = SysAllocString((WCHAR *) L"system");
: r' Q' Y  f- \8 L        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
5 [5 o5 O. S% ]" w" }8 M% n        requestVariant[1].bstrVal         = topicStr;
# G% }- v2 q3 m. G8 ^$ f% G/ Z
. e1 X$ p. z$ a: b+ ?. l  l//        Set the DISPPARAMS structure that holds the variant.
- b- i) Z! h& w& G5 B+ ^/ I
9 [; g& I6 K) ?" m* j1 u        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
# O2 e! |- C3 b# T# K: v6 p        dp2.cNamedArgs                                 = 0;
0 s; Q# B8 w1 m5 f* a" K' x
        var.vt = VT_EMPTY;
7 i6 Y' _3 j* d) f4 S3 J4 k) O
//        Call IDispatch::Invoke()

9 H. C& J) o( s$ ?/ S3 G$ O" E1 S        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
% m, W/ p5 i, G" J$ |- h4 u                LOCALE_SYSTEM_DEFAULT,
. R! K6 e- z: E                DISPATCH_METHOD,
2 c* }8 S7 n1 Y* v5 V: j  k+ Z                &dp2,
$ @9 h6 W, i2 p/ y7 q                &var,
" P  N& L  c0 z. q1 b8 [                &ei,
: n. T; U* v. E- S/ p8 x  c0 f                &uiErr);
1 Y4 ^  e2 y* J, c! u' H- L
        SysFreeString(topicStr);
' G3 X+ x; f2 h% s8 O5 H# O' E        SysFreeString(itemStr);
8 _" H: D  e  e0 C' M; F请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？