c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
5 b9 i3 E3 g2 R% |# bName = (WCHAR *) L"Poke";
& k) o5 f/ R2 {1 Y2 R2 ~& @                
6 u) M6 E+ ^9 O" ^+ O* ]- ]        hr = m_pDisp->GetIDsOfNames (
6 O8 r- d2 x( [; C7 i                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
$ a; }" \( G: k! @4 U4 }                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
5 f. ]6 k  h7 i/ F; a                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
* g: ^; V7 h3 k/ U3 M                {
' N9 G! S  J& _, ]1 p                MessageBox ("Get Poke Unsuccessful");
                return;
$ F, s6 K% x8 K$ \1 }  f                }
. U) j2 ]1 G5 P) ^, y, w( T" A
/**************************传递数据给extend**************************************/
+ O, b: h3 A' @2 b) g  E4 r6 G+ |        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
8 M2 \4 c2 k+ I6 B       
% f, Y; @  I" @% E- h+ z         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
+ g) z9 G; l* r6 g2 D; ?( h        pokeVariant[0].bstrVal         = valueStr;
: B  o4 q' T! G  v2 D+ G( h
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
) W/ C& ~! F/ _" g+ V4 o        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
% C; Z, z  L' v# M; C$ Y: k/ J        pokeVariant[1].bstrVal         = itemStr;
5 ]0 s/ ^" n' j$ z3 m0 r- i8 j
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
8 c; R% T9 _' Q6 X! G        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
+ q: ?# E3 \- ~8 s. a% U% y
//        Set the DISPPARAMS structure that holds the variant.

3 {' F/ v: U+ T9 c0 }# a        dp.rgvarg                                         = pokeVariant;
+ c! ?+ c% G! I' b7 F1 A        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
, Z/ n; X) J9 L. r3 g  W0 ]4 `        dp.cNamedArgs                                 = 0;
* U. @5 t1 g  [$ i/ x
//        Call IDispatch::Invoke()
$ ~  a; D4 {# U3 Z5 O* L
        hr = m_pDisp->Invoke(
  u% g5 {* H6 G* T' }                pokeID,
6 Y& t( V; a  K! D                IID_NULL,
) D% `1 V4 M5 w, E7 x7 I                LOCALE_SYSTEM_DEFAULT,
) H, u' c% n1 W( n* n: Q: j                DISPATCH_METHOD,
# t! r' Z* f) g  K7 q  ~$ l                &dp,
* q* C& n. n9 u                NULL,
5 Y; a0 p' f# [! p! k/ `0 Y                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
: _: w' ?5 z7 ]/ I7 X! h        SysFreeString(valueStr);

现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
6 G) B+ s4 l+ U/ g+ }; {* x+ K
$ V4 K$ Y2 o  ~5 Z6 _; s& ^
& j" J7 b" p9 A' {  {+ W2.这是request的程序
//  Request a value from Extend
//
//        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
//        BSTR into the variant structure.
9 u8 u  m7 N! X% P( _, a' j$ B
$ @8 c. j3 ]( k" s        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
  J7 |( }8 \7 p5 M: }9 B       
7 ^+ p. o9 j. I% m9 }1 @* \$ y& Y         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
& r6 ^1 u! _  v- y  {% L& [        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
" v! H. v# k% W. v: `6 R+ E
          topicStr                                         = SysAllocString((WCHAR *) L"system");
1 o" U( h  U# M        VariantInit(&requestVariant[1]);
: W9 V) @2 y* M( M% T        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
* y( c) I- S# |: \9 c
//        Set the DISPPARAMS structure that holds the variant.
/ b0 ^( r) S" `; k% |) E
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
% Y7 ^( p* ?! U        dp2.rgdispidNamedArgs                 = NULL;
. Z# F& ~7 F: M3 j) ~        dp2.cNamedArgs                                 = 0;
% X- T2 z: T: G, z+ l2 u8 ~, J
        var.vt = VT_EMPTY;
. j8 r, m$ H2 D* W( L1 D
* i; `1 A3 V9 F4 m. R6 x//        Call IDispatch::Invoke()
% B1 E; B1 D  q" f6 Z9 A2 X
0 J: o; X4 w6 G+ o        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
' {. l' u2 z  g5 L                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
: h  T" U5 n4 Q8 \/ G9 w3 D) z                &uiErr);

" S2 O! `# k+ Z        SysFreeString(topicStr);
. d. @0 `* X: O& V, h2 n% r* D        SysFreeString(itemStr);
1 M0 r2 o$ ~1 h6 E! F. }9 P" I请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？