c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
2 R! X% {8 b* u; fName = (WCHAR *) L"Poke";
1 X/ P9 `$ q8 k! Z                
4 U+ L2 p/ L* I. g* ^7 X        hr = m_pDisp->GetIDsOfNames (
! H/ U* s- U& ~                IID_NULL,                                // reserved
, ?3 J5 i1 t9 k4 X1 i+ o$ j! u                &Name,                                        // Array of names to get IDs for
( @9 u5 i3 o; u  S' C; J: z                1,                                        // # of names in the array
  m5 ?6 k5 K$ H$ |- `) o0 ~4 r5 K                LOCALE_SYSTEM_DEFAULT,        // System locale
# C# n+ t1 {4 Q  k, M6 R; e, p                &pokeID);                                // Array of IDs to fill on output
                       
- z- p; S' y, w  Q9 a: J        if (hr)
1 ]% _8 V+ y" T3 f4 |8 ], x                {
4 n4 g% b3 k8 m                MessageBox ("Get Poke Unsuccessful");
                return;
8 x! A; O0 a; U4 r                }
! q/ q4 z# a0 N  b& X7 }9 d9 _
( m1 E4 c# J4 S0 Q) c; I* `/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
4 n3 w4 o3 T) ~# T! h6 D2 m        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
( G% y" a+ H9 V0 m; A/ E& Q7 c, a; y        pokeVariant[0].bstrVal         = valueStr;

/ X! N' I' c4 U3 m         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ p) \  l/ V3 ^( u        VariantInit(&pokeVariant[1]);
5 g1 F. S' C' u+ y        pokeVariant[1].vt                 = VT_BSTR;
: c7 ~/ u/ j2 T! m9 {# ?9 u) d        pokeVariant[1].bstrVal         = itemStr;
, q% x- i6 Z; K# @0 `) s
0 h$ T( B( M/ U) _  K          topicStr                                 = SysAllocString((WCHAR *) L"system");
  ]8 W1 O) ~1 P        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
6 k5 P. P- G9 s0 o& v; M; f        pokeVariant[2].bstrVal         = topicStr;

. f* w8 A$ f2 |7 \; F" Q//        Set the DISPPARAMS structure that holds the variant.

' m4 t/ e3 `- m# ^        dp.rgvarg                                         = pokeVariant;
8 X* a+ j4 M8 N( W5 a5 ^        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
0 p5 W. a  V$ n; [8 Z- G/ b* C, w' q
//        Call IDispatch::Invoke()
2 Q$ g7 V6 x  M2 y: S2 c
        hr = m_pDisp->Invoke(
0 F! e- G3 J+ y/ V' v3 Y                pokeID,
                IID_NULL,
8 N% m8 \" U% s6 V" ~                LOCALE_SYSTEM_DEFAULT,
* n- _  {% ~2 S                DISPATCH_METHOD,
                &dp,
( S: a6 Y5 m- g+ v                NULL,
) z. j3 w7 M1 ]7 b' R% K                &ei,
                &uiErr);

! ^* Q' n4 ^  i7 k        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
& j( y0 o' j% ]8 U) o
  s: ?& Y8 K! z! P( T: q% [现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
! B& L, U2 ~$ L/ g) t

; j- I5 S$ P+ f5 [1 ^5 F2.这是request的程序
//  Request a value from Extend
+ p4 Z4 w. l' v//
; z! _$ o1 P& U* ?: V% B//        Initialize the variant that will hold the BSTR.  Set the variant's
# x# e6 F) C0 R  O; w) F( t//        type flag to indicate the fact that this variant holds a BSTR. Place the
0 l& _" P; b: N2 L4 p0 o9 @//        BSTR into the variant structure.

( g0 G7 ~* Z0 K' H, b        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 Y0 b: `5 [  b1 u( E/ m       
+ l( |3 J. A, X) P# l: J         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 W2 J# N2 Y6 P" Y9 x) J        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
) j6 n' D% j; A8 @        requestVariant[0].bstrVal         = itemStr;
" a( J- e6 u* n; I7 {1 b" T9 ~
( q/ u* B7 A$ }) |& \          topicStr                                         = SysAllocString((WCHAR *) L"system");
4 ~$ D' m) M& B        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
6 }! G2 Q( e+ w- {& c
//        Set the DISPPARAMS structure that holds the variant.

* I9 X/ `* A# H4 Z        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
; e: v1 G* v+ W  x; l        dp2.rgdispidNamedArgs                 = NULL;
7 F9 }; O, |  u2 p2 e( O7 g        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()

0 D3 V* M7 I, l% @1 S        hr = m_pDisp->Invoke(
% b" ]# @) P8 @. S3 F5 ^! f. g: I                requestID,
/ S8 y: M$ h! H- t                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
$ O1 c, `) f  u' E2 u                &var,
5 l7 q0 {* Y0 z' ~% E) j+ }                &ei,
4 s" `$ z9 J0 Y' l9 B                &uiErr);

6 d' o% o1 o6 g  W        SysFreeString(topicStr);
        SysFreeString(itemStr);
' B& f7 V3 p( [' g请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？