c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
( g2 C5 i4 I" K! ^. F        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
. }+ s4 _% ^0 W9 L5 ~6 o4 U1 c                &Name,                                        // Array of names to get IDs for
5 i' H! s- _$ {* ^8 t+ K                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
5 b, }2 F2 l# \                       
. K* F# [" A! s; i. p( ?        if (hr)
- C: c; U, q* k$ A  I                {
) e9 G- e- d% k' M4 P: Z/ m                MessageBox ("Get Poke Unsuccessful");
                return;
4 W( y# X' d& S5 k# Q' ^/ E                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
  g9 t+ ]0 J; d3 a* Z5 E        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
8 ?6 P# b; S$ S" @  G8 ]8 H& {  P5 ]& ?
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
* ~+ B& d) o9 l+ T' j! i% Z        pokeVariant[1].vt                 = VT_BSTR;
; h4 Q& a' ]1 ?, O2 r+ [        pokeVariant[1].bstrVal         = itemStr;
! T, ?# @2 w+ n% Q; \- N+ f& t
% r0 ~; l4 f9 P          topicStr                                 = SysAllocString((WCHAR *) L"system");
+ E4 P) t4 t% }. r        VariantInit(&pokeVariant[2]);
' ]4 q( G1 o" F( ^0 Y" Q3 k        pokeVariant[2].vt                 = VT_BSTR;
: y8 r1 M+ }3 \3 |        pokeVariant[2].bstrVal         = topicStr;
8 }. @" O* |8 P% ~: T! F) ?
9 B8 u0 {8 R% r$ Y1 S0 ]//        Set the DISPPARAMS structure that holds the variant.
7 H, Z6 g% B7 Y" U6 d( Y8 N
/ M4 R8 m5 t/ r( ~! x        dp.rgvarg                                         = pokeVariant;
) g3 B4 c; b3 Z        dp.cArgs                                         = 3;
- ^! b6 ^. v6 }- u2 \( ?# X' D        dp.rgdispidNamedArgs                 = NULL;
7 ^0 k( y/ I! Z, b# m3 e3 v        dp.cNamedArgs                                 = 0;
' L+ D' p/ {' p9 ]
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
/ k, J# M) }4 y: P                DISPATCH_METHOD,
                &dp,
                NULL,
' n) X8 k# z# {" s. n                &ei,
" R* S6 d. X7 W                &uiErr);

2 Q" ^* ]6 w8 Q' Q$ [2 `- |" K        SysFreeString(topicStr);
3 z8 c- l: Q& U        SysFreeString(itemStr);
        SysFreeString(valueStr);
, ?( _3 _/ ?" x4 ~9 d
3 l6 \/ R: m) O, e& B: A; v现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
( ?' g) e, E: [
# _$ u" s3 \5 k, O. a
2.这是request的程序
/ C9 M# ]& Q; [. f* D. e- \//  Request a value from Extend
4 [/ p- u7 Y1 q7 t7 p/ N//
  s- m7 |3 r. J; `7 k//        Initialize the variant that will hold the BSTR.  Set the variant's
' [5 C4 _3 S, v/ y//        type flag to indicate the fact that this variant holds a BSTR. Place the
( w* u+ Y  T" W, n//        BSTR into the variant structure.
7 ~5 I, H& O6 ?/ C1 ]% @
7 i1 w, V; c. J& D% I        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
3 X. Q1 p% Z6 M( y8 j: M! e       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
6 }% f$ T' u9 J        VariantInit(&requestVariant[0]);
2 f5 h7 X8 o# n; ~$ C        requestVariant[0].vt                 = VT_BSTR;
4 n: R* Y; e) ~8 u  R        requestVariant[0].bstrVal         = itemStr;

, y) y! u. v% C0 O# \2 w          topicStr                                         = SysAllocString((WCHAR *) L"system");
; Z2 s& D3 U) N0 o% z        VariantInit(&requestVariant[1]);
5 Q7 G' P, j3 n& N+ {0 n        requestVariant[1].vt                 = VT_BSTR;
( s& B' U# Y3 w+ j6 O* F0 v3 C        requestVariant[1].bstrVal         = topicStr;

: U, H7 q' z: M+ ]4 s& w" E, z8 o//        Set the DISPPARAMS structure that holds the variant.
2 H* ?" T4 K( N" K' t, A* Y( M
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

  B) o7 {+ d3 \/ W; A; y//        Call IDispatch::Invoke()

3 {, g; k5 @$ H, K        hr = m_pDisp->Invoke(
% n- E" n  ?, G                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
; e: v$ D4 X6 {5 w/ g. S  _                DISPATCH_METHOD,
. k" C7 [* J$ @, {4 r; E                &dp2,
                &var,
4 n5 N# n6 f* @* s- _                &ei,
                &uiErr);
) f* z& ~# l4 T5 y  V: w5 f0 `6 z
! P% [3 N; z# X/ w        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
+ X2 |6 O/ q5 X2 c$ X! j! b  p5 Y如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？