c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
5 T6 p$ V! m- F6 V8 p/ |Name = (WCHAR *) L"Poke";
3 z8 Q# @( g+ M0 c7 x8 {5 _: u                
8 g' B" w: {9 R5 H# W+ [. {% e* k        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
" L7 R4 L- E6 [' n8 I+ H                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
" M# F8 l% P! N                LOCALE_SYSTEM_DEFAULT,        // System locale
# G$ Q: @5 ]& {0 v2 Z                &pokeID);                                // Array of IDs to fill on output
- j; X8 Y8 B" m/ @( P# f8 M                       
1 ^$ |8 D' [& B        if (hr)
                {
/ j) m5 C5 l/ v4 H: U( n# E                MessageBox ("Get Poke Unsuccessful");
: G9 [) T& K- {5 I                return;
                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
9 K3 L# U/ t* Q* F       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
2 H+ S0 W' r1 E( c2 e: y        VariantInit(&pokeVariant[0]);
6 d8 Y4 s" U, J7 o        pokeVariant[0].vt                 = VT_BSTR;
% l! s6 l* y1 j- u! t- l        pokeVariant[0].bstrVal         = valueStr;
6 S- u" c; O) ]1 h9 T. O
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
* k$ k: F; c+ b+ t8 Z        VariantInit(&pokeVariant[1]);
& }7 q& r) ]* Q        pokeVariant[1].vt                 = VT_BSTR;
/ |- G2 e/ A% z+ q5 u5 c) o) {        pokeVariant[1].bstrVal         = itemStr;

7 B: }$ u; V* i5 W          topicStr                                 = SysAllocString((WCHAR *) L"system");
# e) A: q' r8 D+ I& E        VariantInit(&pokeVariant[2]);
# e' P* Q7 P4 K  a5 t        pokeVariant[2].vt                 = VT_BSTR;
; K6 }- E! b: w        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
8 m# J/ @1 C: w  @  Y' ~( t        dp.rgdispidNamedArgs                 = NULL;
+ _7 w0 q* S' r$ \        dp.cNamedArgs                                 = 0;
9 x5 J- l! W- R+ K% g
6 ~7 k3 `' G# L//        Call IDispatch::Invoke()
6 A6 N$ n5 P& _2 D
        hr = m_pDisp->Invoke(
0 {- N) b7 l( j9 s) ?3 ]                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
* J# a% }6 L/ Z  b8 b" ~: ]                &dp,
9 c* c+ N% |: v4 E8 ^4 F$ w: d                NULL,
5 u' `# N+ [% D4 k! S                &ei,
2 z2 [! ~' n" i3 `$ C3 R                &uiErr);
$ y' F3 e. u' j0 K. w' i) M6 p( [% |
        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
- u/ F' N! Q3 Y* Q+ ?* u' Y6 K
2 @0 q! C7 G8 p8 r# a现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
2 c& W) ?' U5 N7 G+ D: U4 G此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
//  Request a value from Extend
//
2 a% s- e! A% `; F' s, F//        Initialize the variant that will hold the BSTR.  Set the variant's
+ p0 v3 w+ k5 w( V5 m//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
; ]3 b% d, e! C3 C& \0 U: b- o
& V3 b( A6 N1 j        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
6 a# H' o2 g" x2 n9 ~        VariantInit(&requestVariant[0]);
; B% Y/ r+ x7 k0 R+ Z        requestVariant[0].vt                 = VT_BSTR;
# k( t/ r9 o# q6 `        requestVariant[0].bstrVal         = itemStr;

$ e$ w8 g9 z* n, e          topicStr                                         = SysAllocString((WCHAR *) L"system");
* Q  m; j; k: b+ B2 n6 P/ y        VariantInit(&requestVariant[1]);
& M( ^* ~6 T1 M; n        requestVariant[1].vt                 = VT_BSTR;
" H' |3 O4 V2 z        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

, \6 T: R: X" |        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
' U) ~5 j7 |6 S  u! X' f        dp2.cNamedArgs                                 = 0;
; S4 @, a( M* V! L6 v. q
  @  o! C/ q6 {8 {6 @5 @         var.vt = VT_EMPTY;
' V) [4 g! V% U& J6 p+ L
6 t* g  [5 J5 `8 |/ [//        Call IDispatch::Invoke()
, F) E) _- c8 s
        hr = m_pDisp->Invoke(
                requestID,
+ K/ f7 _8 o* e; h4 i6 q% c. n$ G                IID_NULL,
+ M1 l6 B: J* H$ ]                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
  Q$ r( @' `$ D( \1 N                &dp2,
$ b+ X# L9 x4 g                &var,
2 A- k+ O5 L. X4 b2 }                &ei,
                &uiErr);

        SysFreeString(topicStr);
. n1 Y! }0 K  k; {        SysFreeString(itemStr);
8 V- x* `, {$ `; R5 \请问该程序是获得extend里面的哪个值？
4 C: i- J9 @$ X! ?0 p如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？