c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
- ^2 X; \3 [# f5 b6 Z4 r        hr = m_pDisp->GetIDsOfNames (
8 q, A$ r, e. b. {' \/ @$ Q/ t                IID_NULL,                                // reserved
4 t1 H6 k% l1 f/ K) n+ S; h" K# I                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
, L9 v- q; S$ i( e, L, I                LOCALE_SYSTEM_DEFAULT,        // System locale
: c3 z6 q& o$ ?& V; g+ J9 d                &pokeID);                                // Array of IDs to fill on output
                       
) H; c+ U+ s% `8 H( W2 L        if (hr)
: H! e+ b( i! I0 o8 I5 d7 e( t                {
! W9 c% J5 F" l/ Y. o                MessageBox ("Get Poke Unsuccessful");
; {2 a2 l/ W; b( E: d$ t- T* ~5 @                return;
; b! h3 r" I& w& p* @  Q; R                }
' V1 Q. |" n! P: @3 c- y6 T  z
  Y! r9 f& S, {0 E: ]6 T8 }/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
( O. d9 `6 l0 P' `        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
! I6 n( M7 {0 f/ O9 p& J- A        VariantInit(&pokeVariant[1]);
+ e: m% h6 |* d  V- t. z        pokeVariant[1].vt                 = VT_BSTR;
" ?- k  {0 @& `7 a        pokeVariant[1].bstrVal         = itemStr;
* |% e/ S8 C; E
6 p* W0 s# V2 Q  x9 f! y          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
, |. o1 X( A% ^2 ?$ A4 y        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

0 J1 r% w5 v4 o2 k. C6 |! Q  V//        Set the DISPPARAMS structure that holds the variant.
* U) C/ l  L7 V7 ?0 f: h. \
& C1 J) a& j' a  O  h0 A$ y        dp.rgvarg                                         = pokeVariant;
) y4 Z" ?" d9 s. F3 N: X* E. E( o        dp.cArgs                                         = 3;
; H! N0 M* n7 l2 u: y0 [7 H" U        dp.rgdispidNamedArgs                 = NULL;
% i: ~3 g* I3 n! N2 M7 L8 ?        dp.cNamedArgs                                 = 0;
, L3 ~- b# b1 c2 g
' n( p$ i: X3 [//        Call IDispatch::Invoke()
( A* D; z9 a( }2 `
        hr = m_pDisp->Invoke(
; d! |0 I% J+ C3 e& Q# W+ [9 I7 R                pokeID,
, k* H0 m4 r6 L0 L                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
- i- V3 }+ u" p                DISPATCH_METHOD,
' g# _* j. }+ k8 l5 D: O7 h. f7 ^* \                &dp,
2 k. ]) S, r4 ~5 f# b6 Y: L$ e                NULL,
                &ei,
5 g2 {. ^6 A# V                &uiErr);

        SysFreeString(topicStr);
$ j9 o- n, p. I! w: V8 k7 J) ?: s2 M        SysFreeString(itemStr);
        SysFreeString(valueStr);
% q8 x3 M1 o. A; E9 d6 |
' T; H) `& Z( K; _; L: P: t& W现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
: T- p0 c9 p/ W此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
, @4 l# _7 b$ [5 {" _

2.这是request的程序
8 A6 U  O& f; F3 \7 L8 j' b$ P//  Request a value from Extend
/ F- E) v/ u: S( Q; C0 Z//
//        Initialize the variant that will hold the BSTR.  Set the variant's
$ `3 I6 _+ E1 A" u//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

# K* C/ w* x4 e9 D/ ^. x0 S& l        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
) @( d6 I  t, U( [" T         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
+ U( i6 ?$ Q" o. D$ i# ~        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
) z  Z0 i% V( z- F' _6 |# z$ g
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
& p2 j2 ^; Q) Q        requestVariant[1].vt                 = VT_BSTR;
6 F" D' z+ J3 ?0 A2 k' d6 |        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
- ~5 w0 `3 T; v; b: y+ B* I        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
" i: @0 b; J5 J
3 V9 O! n. t' U2 w         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
: B8 H9 A! S; {                DISPATCH_METHOD,
1 o7 s( B& X! H  v$ t& L. i  `6 k/ y                &dp2,
                &var,
+ r5 D- _0 M3 _* @6 d                &ei,
                &uiErr);

5 n1 a& Y7 ]0 `' S2 c$ q. i+ F4 J        SysFreeString(topicStr);
        SysFreeString(itemStr);
  u8 z6 i4 ^6 U7 \: J. \. l请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？