c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
! F; t: ?% }' }) QName = (WCHAR *) L"Poke";
                
# ^: R( g5 S- t, y6 i$ _        hr = m_pDisp->GetIDsOfNames (
% i+ S! H  G- g  G9 M. I" [, V                IID_NULL,                                // reserved
; }+ J6 A! [1 }5 U1 E. B1 Z( ~                &Name,                                        // Array of names to get IDs for
" T  \, Z1 ^  @, Z5 C                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
# d8 |/ o8 g8 q( t# |: ^                {
                MessageBox ("Get Poke Unsuccessful");
: K# K+ b/ @6 ^$ B/ v; J                return;
5 w7 N8 E+ |6 e3 ^* j                }

9 X* ~) J% _3 Q+ v1 }5 ]# i/**************************传递数据给extend**************************************/
  I$ A7 N# a" ]# v        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
+ @0 @  X6 y  U3 G: F2 v7 B        pokeVariant[0].vt                 = VT_BSTR;
& [" P% Y. ^$ i" C# Z) P5 K1 S        pokeVariant[0].bstrVal         = valueStr;
2 ]( m0 K" n7 @# P( j$ e$ @
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
! X: x, C/ d0 @5 N0 o& c        VariantInit(&pokeVariant[1]);
% {8 _1 @( k9 d. }" S/ _* N$ O4 J        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
, G& l' R' x+ |( c- N
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
2 C# f, b# O+ }! E0 T        pokeVariant[2].bstrVal         = topicStr;
# w2 [# S1 o) s2 p+ A
/ J0 I/ e3 ?* {0 w# Q% ~4 W//        Set the DISPPARAMS structure that holds the variant.
8 s6 C. }" @) k) _4 c
        dp.rgvarg                                         = pokeVariant;
4 _+ F% [# ?( q! ]        dp.cArgs                                         = 3;
, c: W: ~. U' T        dp.rgdispidNamedArgs                 = NULL;
: K( Z5 r0 J9 a( H7 T  G        dp.cNamedArgs                                 = 0;
- w. \( F9 _7 |3 V) Q. l, [( z
. `2 |" ~! t' w: F7 q//        Call IDispatch::Invoke()

3 d- Y2 R+ @5 T+ x) G        hr = m_pDisp->Invoke(
                pokeID,
! W3 E: g/ e9 u                IID_NULL,
# ]2 N- `$ }7 U* S                LOCALE_SYSTEM_DEFAULT,
9 ^/ i$ c( y# ^$ t. B                DISPATCH_METHOD,
9 ]) K, I8 l: R: G/ a; h                &dp,
1 D: R1 j' x" A* j' r                NULL,
                &ei,
                &uiErr);
0 J! X8 O; C, e$ ^" S( v
        SysFreeString(topicStr);
0 d, o3 q9 A+ Q5 V3 G        SysFreeString(itemStr);
        SysFreeString(valueStr);
# a5 C. n0 ?: q) r
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2 F2 T, j5 n# p  \! m3 I2.这是request的程序
0 U9 k. ^+ v, ~6 ^$ S# |' V: r' e//  Request a value from Extend
//
; L" `5 Z+ V$ d9 C//        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
6 v1 c2 n. j. B' u" ~, y, O, X! f//        BSTR into the variant structure.
: o1 V! Y" w% e) ^, k
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
* N. ~0 _0 ]# W2 a9 i0 x$ V: W2 t" m       
# ^$ O1 g4 k- z1 L+ _3 k         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
# d, W4 `2 N* }. S  R        VariantInit(&requestVariant[0]);
& D! l) _# J& k0 N- m, C: z3 g        requestVariant[0].vt                 = VT_BSTR;
, D; X6 X7 w0 h5 k6 `        requestVariant[0].bstrVal         = itemStr;

8 |3 I% Y- ~1 z- Y          topicStr                                         = SysAllocString((WCHAR *) L"system");
# U4 Y8 J% U5 s, U2 q+ Q- j  }        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
( B1 [3 h' A7 a% j" i        requestVariant[1].bstrVal         = topicStr;

6 B8 F$ S) {) h! k4 h5 R  Z) p//        Set the DISPPARAMS structure that holds the variant.
: c& b, c0 u  ^7 T
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
9 e9 `! h/ V, A4 H        dp2.rgdispidNamedArgs                 = NULL;
7 w1 n2 |0 G6 T+ W! f6 B        dp2.cNamedArgs                                 = 0;
2 Q, q1 s% P5 f" W. Y  X
0 g* v- N# |' P- B% j3 ]0 E/ Z         var.vt = VT_EMPTY;

0 |  _' \, `; V7 r//        Call IDispatch::Invoke()

, C, N6 I& j, j6 ]        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
' j0 h( X% ~$ m9 D                DISPATCH_METHOD,
                &dp2,
! X) u- V+ p% C                &var,
                &ei,
; G) h, d: r, y' V                &uiErr);
; g: E) v8 [' X3 ~1 P
+ Q7 i' @& u( \# m4 W( i. A9 B* w        SysFreeString(topicStr);
* ~( ]/ ^; f( P: G5 T8 {$ W) i        SysFreeString(itemStr);
$ G! ^- b2 |6 R: w6 ^' q/ ]请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？