c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
8 s9 D: A2 L2 ^: V/ yName = (WCHAR *) L"Poke";
/ G- J$ {# `0 h1 T9 P2 r                
6 c" H& S0 W( Z        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
( a3 |. i. j% V- [3 {6 \                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
; A8 Q" W; D, f                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
6 }! y# T3 f4 D+ J- Q                {
$ i/ c' h5 g3 S& ]( i; Z+ N                MessageBox ("Get Poke Unsuccessful");
( s# I* {# ?. u% G7 @; @  Y% X                return;
                }
! O& S: q2 E; f1 j" S& ~
' t% O# n; ~2 M' H/**************************传递数据给extend**************************************/
  F7 y9 a2 Q. T- c        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
3 W5 d0 [# }; [/ b/ S+ U( O       
& E; R5 f( o4 K9 }         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
% [$ L" a3 M; T- D0 z" \+ h        VariantInit(&pokeVariant[1]);
0 ]# p" [/ ?5 }( l; s$ I% O        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

7 R6 C* ^2 H, g$ h/ d7 B          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
0 ^) }1 i' n; w: V' Q1 D0 g% ]        pokeVariant[2].vt                 = VT_BSTR;
9 l* m4 f  }8 K$ _+ h        pokeVariant[2].bstrVal         = topicStr;

/ r8 B. G0 F) ]* m& j. X//        Set the DISPPARAMS structure that holds the variant.
. F( e& H9 ^4 w
        dp.rgvarg                                         = pokeVariant;
0 p! A1 J0 z7 U. V6 T3 w  J. ]        dp.cArgs                                         = 3;
, Z" O4 j3 l7 r        dp.rgdispidNamedArgs                 = NULL;
) J6 k- G7 \7 r0 v        dp.cNamedArgs                                 = 0;
7 o) F7 k# q' A' X: Z
//        Call IDispatch::Invoke()

( M$ d0 U# b# |- O9 P5 W( q        hr = m_pDisp->Invoke(
                pokeID,
/ s) r1 s( f/ f                IID_NULL,
, M/ a) F4 M- }9 P& m                LOCALE_SYSTEM_DEFAULT,
# \& C' Y4 o/ j" w! F  O; H                DISPATCH_METHOD,
: h+ {" v& T+ K. x! g                &dp,
                NULL,
5 {0 S( |+ h5 y  q8 K4 D7 b8 F                &ei,
$ M% }+ d3 F7 F) u3 R4 O; r                &uiErr);
4 ?7 S2 o) ~* Z) _
" O/ M- ]5 {( Y        SysFreeString(topicStr);
        SysFreeString(itemStr);
$ I. V/ H& P" a+ w7 M: c; F) a# m! a        SysFreeString(valueStr);

0 v& ~. ?0 ^( t0 C现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
& {" G+ n7 N/ v) V此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
  p3 v4 {7 s& s5 O2 s6 s# T6 n//  Request a value from Extend
2 ~# t0 o  J4 \/ N& Q//
# ?" C) [% H  T2 c//        Initialize the variant that will hold the BSTR.  Set the variant's
: Z4 v% K% ]5 C  B1 C; \9 }//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
5 l3 b7 r* u, S8 ]( O/ ?
" a+ E& s8 u* X4 ^% j. D( A9 K# c        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
; Y/ }( L( ^9 J$ v# E       
, l( m- X$ r% M. o7 ~$ C9 b4 W' W         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
+ M# H) g# L" P+ ~. W5 e        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
1 a% l; L+ n* W& Q! u5 ]/ r        requestVariant[0].bstrVal         = itemStr;

: A5 C% Q' s/ f+ O2 Q& W  I          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
' z/ o$ q3 E; M6 p        requestVariant[1].vt                 = VT_BSTR;
) z" Q, ], i4 b" q5 b8 Q7 b        requestVariant[1].bstrVal         = topicStr;

- w/ o# ^/ y$ I4 H4 v; c& t//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
- w8 F6 W% W4 l8 |( m" }8 l        dp2.cNamedArgs                                 = 0;
+ T2 y$ C- j/ t$ D
$ W2 R: }9 O# l         var.vt = VT_EMPTY;
9 |4 f5 t1 c* |4 {" o
+ c1 c( D/ y% a+ L# p//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
0 M- j0 Z0 M+ D! s3 M7 g                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
# Y2 r: x  `8 G+ e# U8 x                DISPATCH_METHOD,
7 E, O. X0 O9 X6 C% Z% ^# {# Z                &dp2,
% U! V" Q. ~# Z& ^( [: e9 f                &var,
                &ei,
8 R8 A+ r4 O% Y1 D+ |* Q                &uiErr);
" |# n2 {- }* V
        SysFreeString(topicStr);
7 Z6 v5 z- y- y1 u# a. ~! N$ n        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
/ c- e; l* J1 ]7 X! F如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？