c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
* l5 W- c0 M% R& }Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
5 H' J$ ]' M* H6 V                &Name,                                        // Array of names to get IDs for
6 o) U9 c- J( ]- D' d1 U                1,                                        // # of names in the array
* o9 W: {1 B7 _* K                LOCALE_SYSTEM_DEFAULT,        // System locale
2 R2 Q  t# a6 @& J4 D1 Y$ K                &pokeID);                                // Array of IDs to fill on output
; ~" M+ q" j0 F% w. |                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
$ E% U0 F) H6 L# R0 u
) x' w0 D5 C/ V' ]# q/**************************传递数据给extend**************************************/
3 n5 c; g) g0 [: s" H" O        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
# I; z- Q% }7 e/ M. b- R        VariantInit(&pokeVariant[0]);
4 r1 I( C. m, ?        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
/ W$ K. A* F' _; I  c; ~        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
# O( q$ o  f- K& O- F% L% ]        pokeVariant[1].bstrVal         = itemStr;
  I  M6 M2 }6 k6 J9 Z: g4 O
/ S) Y( Z1 o+ u& M          topicStr                                 = SysAllocString((WCHAR *) L"system");
- N+ ~5 r% y7 q  [# @$ y        VariantInit(&pokeVariant[2]);
4 u9 X3 }! j! ?  N        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
8 t* X0 `- W8 e4 y% i1 k' F9 i
* V$ K/ O( |, o6 T( Y2 e3 v) d//        Set the DISPPARAMS structure that holds the variant.

/ J; y" W& \4 D' G% a, s        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
& r+ n- o: B& i; V- E) g        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
# j, Z: }+ r- M6 S" T
        hr = m_pDisp->Invoke(
: I4 r& X, R8 ?2 O) o                pokeID,
6 \7 e4 {: y$ {                IID_NULL,
( \: ^, n" a4 n4 k                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
3 u4 `- \8 z$ Q2 M1 m2 j; d                &dp,
                NULL,
7 [) r1 s( G( A! x                &ei,
  u. M1 V& \  C  n, Y                &uiErr);
: Z& |# s+ s  r5 w
        SysFreeString(topicStr);
        SysFreeString(itemStr);
7 C1 s* I% U8 x' c* n2 l4 F6 ]        SysFreeString(valueStr);
# f0 l' v# }% {* O+ h4 ?7 L5 q, \
/ }7 ~" C3 h: k现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
' F4 C& @0 d, f% ~1 ]8 E此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
( ^) x$ g2 l( _9 V' O0 \- L

3 A  t/ K3 p) P2.这是request的程序
/ H) w( [, S9 q$ l, i//  Request a value from Extend
9 I- S4 R$ |; g5 R" _/ u# Y( ]" m//
//        Initialize the variant that will hold the BSTR.  Set the variant's
, f- R3 C" O+ ^! S; h& C//        type flag to indicate the fact that this variant holds a BSTR. Place the
8 t, ?9 e: B  a. G8 u8 c//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
0 v  o( B0 T, I7 v' w6 j: i         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 p1 S( k4 _+ o# ?. J9 L: d        VariantInit(&requestVariant[0]);
8 I. n( V8 {7 D- a+ f% e7 n* x        requestVariant[0].vt                 = VT_BSTR;
% E1 E. V* H; `( t9 q        requestVariant[0].bstrVal         = itemStr;
, }$ l# u/ u1 z
          topicStr                                         = SysAllocString((WCHAR *) L"system");
  l4 N9 k% L) w* \' `8 M1 b        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

$ l2 W# V- G$ a  P' D; B2 [) b        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
  ]' X6 d0 J! @) P        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
- H( z' {/ j  V0 z' d3 Y+ Z
        var.vt = VT_EMPTY;
, n5 }$ t2 ?1 |9 t8 S
- b( v2 @1 q0 M4 x" b& M//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
( T) r( ?/ {# [9 ~0 u                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
9 H* f8 J" B3 S! U% K& U0 ]6 A                DISPATCH_METHOD,
; ?, o0 {& O0 z$ `; a) Z                &dp2,
! T: ^  h. u/ w                &var,
) ~- v# |; g  S$ `) U                &ei,
! {) O/ X, J* `5 I                &uiErr);

        SysFreeString(topicStr);
3 T5 T# Q; d, |% u; T; j1 S7 n4 d        SysFreeString(itemStr);
5 z" S( d- m: q5 q9 ]0 P请问该程序是获得extend里面的哪个值？
/ K# }, U' l) A( \3 s. J/ k2 n7 I如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？