c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
, F2 s; x- H$ K+ u+ B+ ]& o& \Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
- Y& X5 P9 }1 S5 c! j                IID_NULL,                                // reserved
! x3 }# O) z1 s' z                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
+ u  l: h) F1 d2 ?2 E  k$ N                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 ~9 E. S; {! T& Y9 y! S                       
        if (hr)
' K+ e! k( o( d. N  ^                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }

) M5 M/ v" e% ~/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
$ U3 m  X0 W1 t1 P9 N0 Y; y       
8 n0 A& @0 |5 t2 k6 e- O         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
' |$ `8 C' @6 S/ {. w        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
$ V% J! w7 r0 U7 }. h: y
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
5 c: A5 I5 W0 u9 w        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
$ \' M: W& b3 ?        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

! P1 i- O( v% u) {" X" P: n//        Set the DISPPARAMS structure that holds the variant.
2 l% x# i) D! r
        dp.rgvarg                                         = pokeVariant;
' c4 x6 E4 R9 P( a6 @( L        dp.cArgs                                         = 3;
4 V2 N# O4 @' g! _5 _$ g9 ~        dp.rgdispidNamedArgs                 = NULL;
0 ^# i& z, O/ R6 {# D        dp.cNamedArgs                                 = 0;
# C. Q$ J8 w. h
//        Call IDispatch::Invoke()
* ]/ f7 L, o3 h% m9 a% c
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
, {9 R2 Q/ I5 {% ^( V( k6 }2 W                NULL,
                &ei,
5 C" a  W) i  s: B                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
! b- _# A5 W9 R# ^& @" t7 j        SysFreeString(valueStr);
9 s/ O" e( q) `, g" B6 y/ E
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
7 U3 _$ \4 ~1 y5 F8 e
2 y$ K+ R" e/ K# c4 t* l1 ]* p' m
! \% A) T+ n1 o0 R2.这是request的程序
* U% o" W9 C% N//  Request a value from Extend
8 e  {% w& y8 _7 @6 X//
//        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 ?# D7 t. Z% G        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 v! s; o6 f  k! s- F5 ]: ^       
: E9 G0 F  Z# l9 _2 B7 k* h         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
3 h% R* Y5 E* B# b        VariantInit(&requestVariant[0]);
) x& Y/ p) Y( Z6 c* `5 X        requestVariant[0].vt                 = VT_BSTR;
1 c0 o; v; k$ m+ B4 |1 S% \        requestVariant[0].bstrVal         = itemStr;
8 x8 o2 }. z0 N  Q% u- Q4 v
' y: l) a  ]9 D( d& i2 Y1 z! W% ^: W          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
' o/ t6 K. @, N) M        requestVariant[1].bstrVal         = topicStr;
  B' k  [4 k4 T: S- @9 h6 c
//        Set the DISPPARAMS structure that holds the variant.

7 ^7 k1 E5 x8 T3 G& U3 O        dp2.rgvarg                                         = requestVariant;
* \  g! }: y$ p( u        dp2.cArgs                                         = 2;
; }& l: A5 S, w9 C9 a. X. {, C        dp2.rgdispidNamedArgs                 = NULL;
% {( F( q& D8 d7 ]. j2 O: }        dp2.cNamedArgs                                 = 0;
5 d. E. M* n- k& K4 E' k( I" C( G# R
        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
1 w' P% w4 q) F$ X1 X% |                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
  t: f. L( c0 n. G' d* j                &dp2,
                &var,
' Q4 S9 s# U) c' k0 b) Y: |1 f7 m6 _! `                &ei,
- }& Q! i- ^% V9 B  Y% W! Q& T" w                &uiErr);
4 |! B( D8 l( G
        SysFreeString(topicStr);
0 Y- ], F' A7 U        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？