c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
/ m% a: _! H* o0 c0 y' t                
        hr = m_pDisp->GetIDsOfNames (
; b* X2 {( Y5 X+ z6 P( a  ], p                IID_NULL,                                // reserved
                &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
( f1 G4 g: v3 }) h! S* \% x% H                       
        if (hr)
                {
1 _/ f/ B, v; p4 |& y& D& g                MessageBox ("Get Poke Unsuccessful");
                return;
                }
. h  D3 d0 S/ A0 g# b; I
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
2 |1 S- l1 r/ {$ I       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
* b7 e3 _' k0 m! S' s/ O        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
( G& ^( F) B, V0 J: T$ i/ {! b        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
- U! X, ]# b* F( h( C( |2 c& y& Q2 z' d        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

+ @$ t4 f; o3 b: H- A          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
, W5 j2 x) v" p0 A% d- }        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
" X* O  ]. \' @! B        dp.rgdispidNamedArgs                 = NULL;
0 h( F' e4 C1 D& v- C        dp.cNamedArgs                                 = 0;
+ C' q3 }9 |  u
//        Call IDispatch::Invoke()

6 v4 H2 @5 t% F: L        hr = m_pDisp->Invoke(
# |3 r4 [( T* J6 l9 I1 U  V; R6 b" Q                pokeID,
3 t- X& X( i  ]1 l! G* p: |; e                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
6 J5 k. K. ?* @4 e                DISPATCH_METHOD,
                &dp,
                NULL,
                &ei,
                &uiErr);

7 {5 ]; f2 V7 t; P+ m* ?* r        SysFreeString(topicStr);
5 Y) K% B) L) `" H: U, k        SysFreeString(itemStr);
0 [2 U* M: w7 s" T* e, Q/ i2 f        SysFreeString(valueStr);
' I7 B5 }/ M' I& U  n! B
% f1 b0 ]. Z6 _/ g7 p  C现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
" F) e3 V4 z1 f此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
) W0 z7 V" x4 F  r+ j

% p* H/ M6 M; @, S3 L2.这是request的程序
, X$ t7 N3 l" d, D//  Request a value from Extend
//
# x/ E/ |' p0 r# \$ y( X/ 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.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
! y+ u% ^7 @+ u& [& U       
; c6 l5 M4 D/ ~         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
' S! G9 B5 n5 }' H$ i2 o        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
$ z* i( g! y' E        VariantInit(&requestVariant[1]);
) G/ a1 [" ]6 X6 L" s/ h: K+ R        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

- k# O6 f* G( `$ N! P* }+ Z//        Set the DISPPARAMS structure that holds the variant.
- v0 L  P, m, F
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
2 o6 E" R" M6 N        dp2.rgdispidNamedArgs                 = NULL;
9 @" a, ]' j, c1 a8 A/ |        dp2.cNamedArgs                                 = 0;
, d  C( h! ~! l; j6 L3 i. ?+ n
. N. \$ v- g  f0 W' g+ a         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
3 R& j, P' X1 A& [7 P
        hr = m_pDisp->Invoke(
                requestID,
! z! s' L$ M  V$ i$ n( U                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
, ~0 V" c7 U* b                DISPATCH_METHOD,
& }" {5 s6 C7 X4 V5 }8 Y                &dp2,
                &var,
                &ei,
- |4 |& o) X" n* q* }' S                &uiErr);

8 q3 c4 h; q0 o# c+ l$ J" o        SysFreeString(topicStr);
- X5 F1 X3 U4 W" e) S        SysFreeString(itemStr);
+ {" j9 ]- l2 T2 \" Q* \, y请问该程序是获得extend里面的哪个值？
: f; H8 |3 t/ n; g* e. @如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？