c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
0 C$ H' [! {5 x4 n1 |7 @; IName = (WCHAR *) L"Poke";
- n) r$ p( T! k, R" J                
2 E$ h1 y0 N5 ?& t+ I$ L/ p        hr = m_pDisp->GetIDsOfNames (
9 |6 ^5 \5 g/ F3 ]" e                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
/ o( D0 Y  A4 ]$ s) Y- }  J                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 p2 N# A3 y" ?( H6 o" G) \* p                       
' d0 v& n6 z' E" ]5 q        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
' L4 i# Z: @* ]                return;
9 T7 G# `' G1 n, |$ X7 P9 r6 K                }

7 Q# _* `$ @' I) Z2 h/**************************传递数据给extend**************************************/
7 l! y; Y. g6 g        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
" l2 |( `' g6 T. i& Q+ i2 G7 r6 ~         valueStr                                 = SysAllocString((WCHAR *) L"1232");
. @- u0 Y. |. }: |1 H' s        VariantInit(&pokeVariant[0]);
" q( g3 \5 f6 U        pokeVariant[0].vt                 = VT_BSTR;
% C# J9 ?. q1 V6 ?        pokeVariant[0].bstrVal         = valueStr;

+ N& I1 Y% L5 q3 e         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
1 m2 I1 p0 J2 Z& K7 W1 b        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
& L. @) E( |# O# W& A        pokeVariant[1].bstrVal         = itemStr;
. `( C( l3 V8 `2 M. B
$ j- w* i8 b0 O  T          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
7 {# p, Q  n' `4 z1 U3 d. [        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
+ E. y3 E6 ~0 a' g
//        Set the DISPPARAMS structure that holds the variant.
# L9 A8 R/ U! Q3 i9 {* _  y& i1 o5 l
: G/ ^& X, X7 U* P+ M: k        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
5 S0 V! }1 n- L9 m1 g        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
. |  }& S# _; i' E/ B/ D7 }                pokeID,
! R9 x3 }4 n8 k2 U+ `2 v                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
# D- i5 B9 X1 ]3 V8 @5 s: [6 q3 O                DISPATCH_METHOD,
# S+ M- k+ }- B                &dp,
                NULL,
                &ei,
$ c# |3 m2 d/ S, J+ g                &uiErr);
. v* K/ P3 c6 A+ k
+ r7 _* c7 I1 {+ q  c, m        SysFreeString(topicStr);
( G+ x- }9 B+ F& }1 m' ~        SysFreeString(itemStr);
        SysFreeString(valueStr);
6 Q$ H. ]- A$ b8 L$ @) A+ H
. w/ q* ]' A' p( M现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
- d+ K' q4 b0 f4 C$ C% U3 W* w, t- F

2.这是request的程序
, O9 T. n6 w$ B//  Request a value from Extend
0 v* q( S7 E' \7 t$ W; m' D2 X//
0 q# X* r/ F0 D7 }//        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.
+ e5 a9 S# @( \5 Z, L' F
, U$ h8 g/ o( [        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
" j4 q# R7 _' j2 u6 K       
) Z; r8 t4 X" b& F9 a  R4 `         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
& y, [$ A3 j8 k- L# F        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
; m- R" r7 H. A/ l        requestVariant[0].bstrVal         = itemStr;
7 K4 P- Z# R$ e+ s6 u
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
$ z  W4 U! B+ b1 Y3 F- S8 h8 g7 s        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
9 A# s& F, V6 |* j5 _! a
  b2 H: R* b) E6 I//        Set the DISPPARAMS structure that holds the variant.

5 }& I% Y5 u5 \1 C% B        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
7 p# Q$ L* d( n- u0 d        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
5 q2 I7 w" o+ W0 @2 ?
//        Call IDispatch::Invoke()
) B/ @( a: F# `9 p7 B1 ?" D! X
$ y4 r- i! S) ~, `4 g4 U        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
0 V3 u7 i/ W1 `7 \5 s                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
! j$ X. v9 j9 M                &var,
                &ei,
+ h, |) _" O% i4 W. U6 t9 S                &uiErr);

        SysFreeString(topicStr);
4 t, V  N$ b9 L, D4 M* T        SysFreeString(itemStr);
" |6 I" f$ y6 t* m5 J6 ^) |9 i请问该程序是获得extend里面的哪个值？
; M7 ?* k8 U8 K+ y# b如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？