c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
( X1 ^. \1 [+ U7 {                
& e9 f8 j6 o2 ]8 w% f: k        hr = m_pDisp->GetIDsOfNames (
6 k2 {* y+ M+ \; f( K                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
! p& }5 `% b0 Y3 F/ _: J                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 G- b5 e" @! v+ k& Y2 |- f: G4 M                       
6 K" m" S& W' P- C: U        if (hr)
                {
8 _1 V9 N! P3 T" R% B- R                MessageBox ("Get Poke Unsuccessful");
                return;
7 k$ Y4 L+ {8 L5 _9 V9 y                }

: i, w+ s5 |  Q5 f. w- r9 U/**************************传递数据给extend**************************************/
3 q! ]% Y: ~1 s+ }' p9 {        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
  Z8 Y6 J* T& e3 E! C- n; x3 X+ C         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
. i) L( C4 ]- \% T, m/ ?2 c        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
, S- a( |$ V5 H/ v& t  Z% i        VariantInit(&pokeVariant[1]);
5 v! ]8 @$ E4 p! _* z  q/ L        pokeVariant[1].vt                 = VT_BSTR;
+ m! @1 z- t- J, ]4 @2 Q        pokeVariant[1].bstrVal         = itemStr;

+ h) t5 [5 _2 `          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
& o" ?* u# @9 a6 j5 t& f        pokeVariant[2].bstrVal         = topicStr;
. n& p+ o1 n# Y4 f
//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
0 h' ]4 B& }1 N; J& G1 I7 p) Z        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
; K- w/ u- L" P( u. i, l* R6 k. u+ }
//        Call IDispatch::Invoke()
7 U' l. q' O9 K- M  Z
+ Y. `! U1 P" ^9 h, P  ]5 T        hr = m_pDisp->Invoke(
7 _5 ?! O6 ]- J* Q- F/ E% R* L* V                pokeID,
* M! }' `, e/ z+ B                IID_NULL,
/ `6 R( k5 O) ~: g! F3 L8 S                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
/ l# ^/ `  v* [. m" w                &dp,
                NULL,
                &ei,
* s; V0 P. j. {5 ^                &uiErr);

        SysFreeString(topicStr);
% w7 o8 f, E( z) a. @+ B# y        SysFreeString(itemStr);
        SysFreeString(valueStr);
. |# E8 Y8 ]  g" Z, j" e
3 Y+ u5 F, o- n* S# |! a现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
; U- f4 s/ z2 O' P6 T
, r" S- y7 L% ^! q/ u( f# d/ s
2.这是request的程序
* B6 e2 c1 P% {7 f+ D" K# [//  Request a value from Extend
' p$ s9 W  n. h( |! J- s//
, \2 E0 s1 N" G/ N% f0 w, f//        Initialize the variant that will hold the BSTR.  Set the variant's
//        type flag to indicate the fact that this variant holds a BSTR. Place the
/ |0 p1 h* r7 |. a* G) q//        BSTR into the variant structure.
* b9 r7 L/ Q0 l$ W( [6 x2 \$ t
' o  {* M/ N+ B* J, E- `7 n        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

% q$ ]8 c; P& C: q          topicStr                                         = SysAllocString((WCHAR *) L"system");
" R$ Q9 Q$ _. L* z        VariantInit(&requestVariant[1]);
5 _2 u: |" O2 O5 d. T, O+ ?; z        requestVariant[1].vt                 = VT_BSTR;
, T9 w6 T. ~- O: h5 n- {        requestVariant[1].bstrVal         = topicStr;

. V8 Q/ b- H' X* O: I+ K//        Set the DISPPARAMS structure that holds the variant.
; z" @; ^: `+ a+ J
" u3 q' }+ v7 m: P/ r& x& V( }        dp2.rgvarg                                         = requestVariant;
! c8 X) x. a3 D" D8 I  K        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

  ^! Y- |0 O3 I5 X! c9 I6 M, U, L         var.vt = VT_EMPTY;
6 V' z& t. a! c4 G% `
9 Z* C9 P& X6 x8 K//        Call IDispatch::Invoke()
4 H; O- t' _' l- n9 M
        hr = m_pDisp->Invoke(
; o' h; g, G3 F# k                requestID,
* [7 n# `' V! S- f5 v" _3 q                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
% S4 \. L' V) m' L                &var,
                &ei,
0 w" F$ i- i. j3 [- W! x                &uiErr);
7 k# n& y9 E; C! z, l4 c; C
; P9 Z" k+ V7 l) h- v) `        SysFreeString(topicStr);
$ b- C% L7 X2 u$ p4 }0 Y        SysFreeString(itemStr);
0 _$ Z( a( p5 K6 p8 d( o请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？