c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
, N5 I0 i7 D! |! a5 @4 aName = (WCHAR *) L"Poke";
7 C  Y1 V/ F& V% @                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
; g5 @" g! c6 ]/ L- w                &Name,                                        // Array of names to get IDs for
1 E9 y2 @3 G8 S, v) U                1,                                        // # of names in the array
" m3 P2 v0 {( J( G9 u                LOCALE_SYSTEM_DEFAULT,        // System locale
4 L! ]4 B9 p7 S7 L3 t                &pokeID);                                // Array of IDs to fill on output
/ I- a1 m; C, d2 Z9 q                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
7 d- P& Z. O4 p/ o6 S                return;
8 Z0 v2 p& }3 ^7 O% k4 w                }

/**************************传递数据给extend**************************************/
1 H! w4 l# F" U. ~# T: {, B+ [8 G  ]        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
5 h5 H" o3 g; p+ L' {       
/ w, v# I% m( B9 M) M) T9 H: P. h         valueStr                                 = SysAllocString((WCHAR *) L"1232");
2 r& H0 R- j0 S, |9 s5 T        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
% k8 H- N4 z# G' t( J+ i        pokeVariant[0].bstrVal         = valueStr;

/ K0 W1 F" G+ V2 `$ g% B) n         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
6 S9 N, I8 ^5 d3 h- G  Q; z) M* G        VariantInit(&pokeVariant[1]);
! A2 Z4 t: a$ @* C' h: b# |        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
& o) B/ v- M# H. K6 @5 `
6 N( _  W" M' ]5 J5 Q+ |, l5 z0 }          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
# N* H* c+ V/ M: O7 z/ P1 {4 i        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
7 w1 \7 w3 T  M% t8 f( `
; a, r0 x" j8 y, n  G, ?6 F, l//        Set the DISPPARAMS structure that holds the variant.
9 R+ E3 g" n$ w; G- ?7 }
        dp.rgvarg                                         = pokeVariant;
& `2 ~+ a' n* P- }! r  d* B        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

& E2 I, {% c9 l! ^: _//        Call IDispatch::Invoke()

: Q; s+ n. A5 ~$ ?' N/ \" l        hr = m_pDisp->Invoke(
                pokeID,
- ]$ S& |1 C' X$ `0 ^                IID_NULL,
% ~' c7 w7 z% i                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
- C' v$ T2 h) x. d) ~9 w9 T                &dp,
                NULL,
( M8 \7 r2 z+ Y# O* ]9 ?                &ei,
                &uiErr);
$ r3 g; k6 `2 m( L0 c$ {
' u& h7 h" s! c3 V( f        SysFreeString(topicStr);
6 F3 y6 L: f6 p9 D: r( x        SysFreeString(itemStr);
, P2 w" T- l7 H- x        SysFreeString(valueStr);

% O1 P! k9 U$ `4 X1 Z' Z5 s( T现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

1 N8 l( x& V4 i0 F% @9 W+ Z
2.这是request的程序
. T" p$ h" K$ a1 c& h) C: m//  Request a value from Extend
//
! ~0 y1 l, K+ p! C, Y//        Initialize the variant that will hold the BSTR.  Set the variant's
& C% k' S6 }2 }1 j$ {, u+ x2 `//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
& Y9 |6 n: q- e" E! h8 S3 u
9 n" _9 N' Q. f+ Y        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
. g3 U3 ~. F$ y         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

. m6 ~3 U6 Z5 a( ?, `. _          topicStr                                         = SysAllocString((WCHAR *) L"system");
( N( q0 _/ I0 K6 I! m6 O        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
3 d8 T9 R$ T* r7 P8 z& Y( a/ d# ^        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

$ X- z' N8 z  |% A        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
6 L+ ^2 j! ~& f        dp2.cNamedArgs                                 = 0;

& f' W: m5 q0 T( q0 p         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
$ z4 r7 Q5 c; u6 @
        hr = m_pDisp->Invoke(
                requestID,
3 I0 @9 S$ B/ g2 n4 j+ k                IID_NULL,
* Q2 _1 e4 }* ~' p                LOCALE_SYSTEM_DEFAULT,
* b' X2 _) x7 U                DISPATCH_METHOD,
                &dp2,
                &var,
$ v6 e% W5 e$ z, g4 F: b                &ei,
! M5 b5 G3 W! {/ A0 e3 O                &uiErr);

        SysFreeString(topicStr);
7 V( |' h8 V( H        SysFreeString(itemStr);
( q; T) ]9 R3 c请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？