c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
) Q/ G, Q+ R8 e$ F# ]" T: W  e- yName = (WCHAR *) L"Poke";
. }* R8 L* M. K8 c5 L                
  P( S$ Z- D1 a- j/ V* |        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
: Z$ ?7 v( M7 p' q( f/ b( P                &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
                       
/ A7 j9 a" ]$ o        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
. n* _' v$ P6 [; x" N  f/ ^3 i  N
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
+ u( C% F( J, t' e' _3 X$ F4 L7 g) K        pokeVariant[0].vt                 = VT_BSTR;
7 f& i5 u4 o7 @2 o9 k2 {  ~: q$ l# P        pokeVariant[0].bstrVal         = valueStr;
; V; n" f) Q! V1 B3 m
# M$ x" k; ~/ k% r1 c         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
7 s7 T4 ?9 R3 }# ^7 z) d        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
. a9 ^3 z/ Y% D0 T: A9 \        pokeVariant[1].bstrVal         = itemStr;

6 p9 _( ~" b1 }% {) d  Z% e          topicStr                                 = SysAllocString((WCHAR *) L"system");
# i2 l! `! D' ]: z' u        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
8 `- c' h% G) G! S
  `) d% C& B; u* S, p5 i//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
/ T! k9 G- O' m4 {6 I( l+ v        dp.rgdispidNamedArgs                 = NULL;
* E. n4 B& q8 k0 v$ d        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
4 [! p5 G4 W" p/ _& T* R
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
1 z; `* J1 ~5 b6 S) s  h                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
5 q* f. V. N* u2 {                &dp,
                NULL,
                &ei,
                &uiErr);
5 j: t  C$ g) Y! U. J6 ?
        SysFreeString(topicStr);
* G- P# {9 ~! R7 e; @        SysFreeString(itemStr);
* [* P# F& T$ h5 y        SysFreeString(valueStr);

) D5 z# W8 b% _* U* m: N1 Y. y% D: E现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

; o* E" c, K4 ?6 g  E4 o
2.这是request的程序
2 w& ?# N$ Z: y( }//  Request a value from Extend
//
7 v% D7 f8 V! K8 n//        Initialize the variant that will hold the BSTR.  Set the variant's
, N* n5 H4 j# P6 L//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
% i+ M! w5 f5 Z0 d( A- Z
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
# B$ b& y3 k, A) h9 R1 v% O       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
4 }1 m( P# k+ z! U. I: |' v7 Q5 J3 K( q        requestVariant[0].bstrVal         = itemStr;
, G$ v0 n* e, W: W
) |' |4 f! M1 I: s7 o3 @          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
+ ~$ A( o# v7 p! H        requestVariant[1].vt                 = VT_BSTR;
5 `1 `, _, q# V+ m' R2 a2 U2 m        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
) e( S4 Z% v7 T# k
( B* r; C$ T2 `$ \2 J' J7 Q) C        dp2.rgvarg                                         = requestVariant;
6 H! B& v" d( \. w        dp2.cArgs                                         = 2;
6 K0 m# C% d. }9 o1 |        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
. F2 S9 ~; Y& w( ]& ?
        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
$ ?0 k+ p( n3 T8 E
        hr = m_pDisp->Invoke(
                requestID,
' ~/ ^9 J9 ]1 l& n, G                IID_NULL,
+ G0 J  B1 G9 }* F8 ^5 L: O                LOCALE_SYSTEM_DEFAULT,
: ?- u5 m( I+ Q9 i                DISPATCH_METHOD,
                &dp2,
) _' x  p/ W$ W4 ]                &var,
. i" j+ y' x& @7 {8 E                &ei,
                &uiErr);
; ?/ T5 X- y1 z. S; E
        SysFreeString(topicStr);
        SysFreeString(itemStr);
; P6 d; v2 c! s0 l; t/ p请问该程序是获得extend里面的哪个值？
8 n' L* `0 r, Z( A: f" R& ^, U0 D如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？