c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
9 R, t  ]7 R4 P) F3 J. e0 k& {                1,                                        // # of names in the array
2 d5 ]" X; `$ ^5 h                LOCALE_SYSTEM_DEFAULT,        // System locale
. \* U& Q8 |/ K' X9 X                &pokeID);                                // Array of IDs to fill on output
/ j( x6 I8 }) m5 L$ M  C/ J4 C4 y                       
        if (hr)
' d& ?) }' _3 p0 q0 l, `5 ~; J                {
                MessageBox ("Get Poke Unsuccessful");
' `4 G1 P2 W) v$ c  g" v$ X                return;
, _2 d, ^1 R3 N6 C0 i( r$ h8 a% h7 R                }
/ l' Y, t! z/ d4 C
/**************************传递数据给extend**************************************/
" x' V5 Y0 m. v& q- Z: f& R% h6 u        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
/ a& s& F3 A3 `  p1 ?        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
; d9 N' w- z* r9 V& c        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
( U& K/ [/ m1 K% ~8 }6 n" ^        pokeVariant[1].bstrVal         = itemStr;
: {  a" e% k1 t- H$ `3 l
          topicStr                                 = SysAllocString((WCHAR *) L"system");
9 W0 c3 g9 d9 R" m        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
( A/ Z+ D$ |1 Q% `' |  t        pokeVariant[2].bstrVal         = topicStr;
) T6 e3 B& h) [2 s$ o# k' C( v
//        Set the DISPPARAMS structure that holds the variant.
/ p5 P  ~" M1 N( z/ C8 X
! s+ r1 {% _3 I; w3 b  ]- h        dp.rgvarg                                         = pokeVariant;
; Z5 p# o& S& V5 x        dp.cArgs                                         = 3;
! Y- X5 I, L. T2 ]8 {% u" ]) }        dp.rgdispidNamedArgs                 = NULL;
6 K) S% p0 x* Y: O' N/ U' F        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
, i& L' x2 V' h( r" J5 ^
' _+ a+ ~8 \/ N; s2 U1 x+ j- ^# [        hr = m_pDisp->Invoke(
                pokeID,
! h( a5 E5 d2 y3 ^2 i# V                IID_NULL,
0 |/ k# f7 B: d; _                LOCALE_SYSTEM_DEFAULT,
# K7 {0 p0 q; J7 P                DISPATCH_METHOD,
                &dp,
8 n/ p. |$ F0 |                NULL,
                &ei,
, i" a4 r  s0 x" \4 R                &uiErr);

* d1 k& i5 H8 Z2 U: g- f        SysFreeString(topicStr);
8 E7 \# f9 K+ _        SysFreeString(itemStr);
+ C: P0 e; d- J/ @& S        SysFreeString(valueStr);

! F& q& ]! F/ G, e- V( z9 f现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
5 T  Q1 w! l# P7 ~3 d  j6 N此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

( C9 {) X8 K' ^$ [% H) I0 |
2.这是request的程序
& @' A: H8 Y0 Q: a+ l//  Request a value from Extend
//
//        Initialize the variant that will hold the BSTR.  Set the variant's
6 n$ s3 _  C1 C  P: ~//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

, D# x9 F  |: M  x" N5 b        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
/ ~1 ~4 K/ f/ v/ `! e       
  h2 d0 \5 n' s! R5 @9 \( f( {         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
/ }! S) b6 z% J        VariantInit(&requestVariant[0]);
7 W8 o' C& [2 x& e0 Q6 E8 ?        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
* }2 G# d- S  B4 |0 v) A3 G4 a3 M' y
% s  U+ l; i; \8 z6 e# Z          topicStr                                         = SysAllocString((WCHAR *) L"system");
9 @$ J! l3 \1 g, o+ ?        VariantInit(&requestVariant[1]);
5 Z/ N) h: t8 I6 q; C2 X: [9 R        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
% ^: B) W7 d' G/ z        dp2.rgdispidNamedArgs                 = NULL;
2 W  B8 z$ u% `9 D/ S; O3 G$ F        dp2.cNamedArgs                                 = 0;
1 S; L2 T1 n% O* b6 \, Q) `
1 h' z  s$ Y+ X         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
% y  d+ J9 \' M& s$ _( ?6 i; w) i
        hr = m_pDisp->Invoke(
0 X2 s+ F8 s  Z- z% p& t( P                requestID,
                IID_NULL,
/ L1 H0 n' ^6 ?/ g' ?% X8 C                LOCALE_SYSTEM_DEFAULT,
; h0 M3 F& F7 ~. F$ b1 T, b8 k                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
! N7 d0 `8 e6 g3 }7 {2 R                &uiErr);

        SysFreeString(topicStr);
: p* \0 A/ @- l7 @6 ~        SysFreeString(itemStr);
. t3 F, K+ z$ o1 U$ p请问该程序是获得extend里面的哪个值？
8 o4 C4 Q0 S+ `! O如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？