c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
* `5 ]% G( M& w  q8 ]Name = (WCHAR *) L"Poke";
                
$ D6 f1 i" \! t( d( q        hr = m_pDisp->GetIDsOfNames (
; C0 y, [6 x* G2 g% N                IID_NULL,                                // reserved
3 b: @$ q( Q( m# y( ]8 K/ l                &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)
                {
  h* W% z! Y& e* O" U7 {) ~: L# w                MessageBox ("Get Poke Unsuccessful");
( r" z, R' s4 x2 l: t                return;
# G& S% A! u5 W* i  \5 L. |                }
0 P  _% l( V: k6 {
3 V0 I, \7 A8 O/ x$ ]% k/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
3 q2 s, S! A; z3 R4 |7 P2 C
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
- O! p9 t3 p5 T9 w- p        VariantInit(&pokeVariant[1]);
$ i. `8 n; R" `% E        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

' J2 @6 d$ W. Q, Q          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
# j; H' X7 T! |  r% @: r  z4 p: _        pokeVariant[2].bstrVal         = topicStr;

, h4 X9 ~# ?* m, I//        Set the DISPPARAMS structure that holds the variant.
% K: Y; y. N2 Z0 B0 v' \) e
1 p; J  m- M$ i, ?7 q3 c! L        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
; S1 l/ y/ _) g* i4 G        dp.rgdispidNamedArgs                 = NULL;
& L6 D' O5 c/ O9 k9 t9 l) A        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
" [* H; O) `0 N% ?, G# o( |                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
                &ei,
                &uiErr);

        SysFreeString(topicStr);
0 {, Q2 D6 b- F. R        SysFreeString(itemStr);
        SysFreeString(valueStr);

2 Y% x# k( {% E6 J: z: I0 ]  V( f现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

& {$ {+ j  ]' K+ `; @8 W9 \
+ G  d" {5 j6 Z5 ^7 s2.这是request的程序
7 w7 B* s% r4 K/ {9 h2 Y$ r) d//  Request a value from Extend
, ?4 D1 x2 U& T5 W4 k7 `; [//
( S# X0 l5 K1 o1 _7 Q//        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.
8 F/ Q! K, V- y& G
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
$ u% |2 g! C; [' ^- q       
4 {$ J, b: ?) q/ x0 s         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
4 ^/ ?1 `% h4 V
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

% F0 Z( {  J( E, C5 H* p         var.vt = VT_EMPTY;
8 I$ K6 y: u/ M9 f0 [- S2 |8 z
& l; ]4 h4 P( O8 H//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
; r; w, a5 y: h& a; N  O+ q                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
8 L9 j& h& K9 _                DISPATCH_METHOD,
, }7 a/ x$ t% l6 i- Z5 o" a5 I                &dp2,
                &var,
                &ei,
: r$ R: i0 W! S& U" X& a                &uiErr);

( J# I) t# s/ l" n" a9 |5 b# V        SysFreeString(topicStr);
' r9 M, d* d1 e2 L        SysFreeString(itemStr);
! S# L3 w  z% O+ x( E& ?! z请问该程序是获得extend里面的哪个值？
" [* T& ~; T2 e" ?$ u6 k, n如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？