c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
$ z/ y: Z% U1 U6 d) }                
& c9 }/ q0 ~& G        hr = m_pDisp->GetIDsOfNames (
; ^3 ~, U8 ]" W5 |' `% s                IID_NULL,                                // reserved
' l! w: K0 M) y6 L. u8 \$ I- |) ]                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
4 {7 N# ?+ ^, b- M: ~" K' n                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
. V" E0 S! B$ u- |) y                       
5 S; h+ }- S  p& F% h        if (hr)
1 L: ~; Y2 _8 C: i  p/ @3 a; [% T( x                {
                MessageBox ("Get Poke Unsuccessful");
2 t( B+ v$ m8 g# ~: B1 \/ D2 B                return;
0 W0 J* o# H& G7 j$ Q" [: k6 A                }

4 E$ Z% e8 [4 S/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
8 |+ z. m3 E: G. k1 A       
1 {5 Q3 ^' r8 V+ d: |) ]% |/ m         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

( r' o) M4 N$ a6 }8 b         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
/ x9 [# @6 I. U7 @        VariantInit(&pokeVariant[2]);
0 W' y8 e( Z! H( s! ^        pokeVariant[2].vt                 = VT_BSTR;
2 A0 f3 l# e: n7 S        pokeVariant[2].bstrVal         = topicStr;
/ M7 X( f4 Q) A, S
//        Set the DISPPARAMS structure that holds the variant.

5 _! {' N& m0 h- f1 y0 g        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
% F, @: X6 U+ a        dp.cNamedArgs                                 = 0;
  ~8 B" `- {( b/ a9 O( }; ?
//        Call IDispatch::Invoke()
: K$ u8 H3 [% Q+ P5 D/ m: B
$ Y1 p7 [5 c. }        hr = m_pDisp->Invoke(
% Y4 X0 Y: f. ~2 L* G4 ~' b6 R2 S                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
8 r+ N' X  d) o+ i) ?                DISPATCH_METHOD,
1 d. m" P8 K' t1 u" \9 J- g3 `                &dp,
                NULL,
0 J9 F% B" N+ V+ T5 u! w) _# h2 J                &ei,
                &uiErr);

" i. a# Q' H" v" K        SysFreeString(topicStr);
" u  c. w6 d7 \7 d2 |        SysFreeString(itemStr);
        SysFreeString(valueStr);

( N3 m; q, }. o: U现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
9 l$ y- p$ q$ Q  S2 o此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

; \/ w4 D3 T% o
2.这是request的程序
; C2 o1 y4 d* D2 ]% b- w//  Request a value from Extend
: r6 C% J- l2 r% r% C$ N//
7 @' h3 T* k$ Z( o/ O//        Initialize the variant that will hold the BSTR.  Set the variant's
9 S% V, K( S! U: h6 F/ [& n1 {* E//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

+ P4 s8 o0 |& i$ q% _        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
( W& [. k7 g. w+ ]         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
/ ~  H7 x) H' B1 X+ E2 o6 r        requestVariant[0].vt                 = VT_BSTR;
  U6 g4 e0 C' T8 V" T; o        requestVariant[0].bstrVal         = itemStr;

; j; V2 U9 m. U. d1 q          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
9 N  `, ?, n! x' I: K
8 i8 r/ v0 Q7 ?( _6 L. \5 F7 C//        Set the DISPPARAMS structure that holds the variant.
* s& ?* `% v4 h/ ?( ~! \
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
9 F  d# y' g2 r4 E# k  a2 X        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
3 y  u6 T2 b" \3 s8 Y$ ?
! o4 V$ l3 f7 h//        Call IDispatch::Invoke()

$ C, y2 e+ `$ H% L        hr = m_pDisp->Invoke(
- k( t1 R' |/ d                requestID,
                IID_NULL,
4 C" }5 O) @! M                LOCALE_SYSTEM_DEFAULT,
, `0 {2 C0 H. |# j( {- ^                DISPATCH_METHOD,
/ }" u$ h- D; y1 B% C( ]3 r                &dp2,
* M% I" q* Y7 `  J2 t6 C                &var,
, J& I- K0 Z; p$ t                &ei,
2 U( A! |5 ?( X6 [! v5 }                &uiErr);
* g7 m( [: j6 A1 ?7 [( s
. U/ ~; J$ r; _5 x$ U' K+ z        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？