c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
# y' w5 G3 S; O8 J) L- w) tName = (WCHAR *) L"Poke";
" j0 u+ T0 R( N                
        hr = m_pDisp->GetIDsOfNames (
. V- N8 a; \: ^* S! k4 M                IID_NULL,                                // reserved
( M/ K, R3 T) m6 A. I9 Y                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
& \+ }  k4 f( R; `+ s8 E) C                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
( n! K" k9 B% t' c$ G! g$ p                       
        if (hr)
                {
$ \% c3 L% J3 I! w+ t                MessageBox ("Get Poke Unsuccessful");
                return;
0 ]  W$ j# D. N( g% q1 [                }

/**************************传递数据给extend**************************************/
5 N) Q# @3 f* E        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
  Y1 f$ N! s/ j1 j+ h8 l+ s       
3 x$ j3 v# I  |& ?' B. I. V" G         valueStr                                 = SysAllocString((WCHAR *) L"1232");
( t* o) a0 @( c( ?5 c        VariantInit(&pokeVariant[0]);
' |) l5 j3 B$ K( u  P9 c+ V: \        pokeVariant[0].vt                 = VT_BSTR;
4 R! o. c8 p( |: {$ k' F        pokeVariant[0].bstrVal         = valueStr;
: K( b& f3 s8 n8 ]
7 j# N; m. P& L, M5 ~$ }- U         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
/ D' u8 h7 O8 T/ ?. P2 {9 b        VariantInit(&pokeVariant[1]);
4 O- H# P: e* y2 Z# {9 Z        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

0 J8 ]- T6 e# M; e$ {) X6 R. X          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
3 A" }( Q) l+ f9 s7 X# L  F  F        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

9 Q4 \) L2 J8 D//        Set the DISPPARAMS structure that holds the variant.
4 U0 p- e1 s% c: p) c
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
. c& E' x" e9 w2 f/ ^        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
% R6 E7 u3 F; m
" O  c) h& p& Q# _        hr = m_pDisp->Invoke(
0 A2 r# n8 o& I, L1 m6 s; S$ W# D                pokeID,
                IID_NULL,
+ x: d  B4 t; `; g$ D                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) g$ B3 u0 q/ m2 x. R' u                &dp,
8 ^4 S  S- U& C$ M6 Y0 w% M                NULL,
                &ei,
0 T, i; Z6 i( D% K                &uiErr);
- n  k3 n; M( |6 f6 s
        SysFreeString(topicStr);
# @9 Q0 S0 `) n1 @        SysFreeString(itemStr);
! H( a! t3 U6 h+ Q. y& k! v4 ]8 t3 Z        SysFreeString(valueStr);
2 p1 o7 \, l! `7 A1 a- y
, \' C- Y* v6 f) H! |# e& N现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
; T) c. V  I# p7 M1 I% o  s. T4 E//  Request a value from Extend
& R# r5 }. e& c% b$ t; R//
/ p/ I! c7 L" j4 _3 r" f% v- X//        Initialize the variant that will hold the BSTR.  Set the variant's
- V; M9 p' Y! ?% {1 ~//        type flag to indicate the fact that this variant holds a BSTR. Place the
, f( k0 {1 o* F  q$ ]9 K) ]# E//        BSTR into the variant structure.
: k2 K# O3 I! F! I1 m" Z
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
" H: g* B! K0 S3 H& y* k& k' v        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
7 `6 X4 ?. t$ S7 o0 `4 D0 y        requestVariant[0].bstrVal         = itemStr;
# {4 k' J. J* n8 C* g2 s
( T5 _5 M5 m& u. ^          topicStr                                         = SysAllocString((WCHAR *) L"system");
6 J: }( C9 F0 J$ k( F7 @        VariantInit(&requestVariant[1]);
2 m2 R! p4 S! P1 p        requestVariant[1].vt                 = VT_BSTR;
9 x) d5 E; ]: t8 m/ E$ k( z        requestVariant[1].bstrVal         = topicStr;
2 l" @; d! n, c) A3 }
- l8 }# Z! ]" ]6 H; u3 J//        Set the DISPPARAMS structure that holds the variant.
/ H7 B8 i8 v; h! C: t- @3 `
: [9 F1 B. `3 J+ ]& g9 s        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
/ q7 P) w* n$ }        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

, T4 i/ Z/ c3 X# A6 S//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
. y6 S2 {- o1 z2 K2 r                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
7 q3 [$ |' u$ W. f# U                &var,
                &ei,
                &uiErr);
* z- q$ {: c  o3 `: q
5 M+ D. }8 ~- j        SysFreeString(topicStr);
3 V  F' h1 W2 t7 o        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
  X1 ?7 d# `( z: W如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？