c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
0 d! S) ^) V. N  j6 x/ g7 QName = (WCHAR *) L"Poke";
9 S. w# R* ~# g8 P                
        hr = m_pDisp->GetIDsOfNames (
# g4 B6 ^  ]. j; @                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
9 @' ~/ ?4 c5 u" j4 {                &pokeID);                                // Array of IDs to fill on output
                       
" i3 q- ?+ S' \! o$ d* G) D        if (hr)
3 S  v6 l. f+ ]* d1 Y                {
                MessageBox ("Get Poke Unsuccessful");
; H1 m9 L, X: `& j                return;
6 S1 |# w- ^0 E" o) u0 G                }

2 _8 n5 d% O$ o4 f! a! E/**************************传递数据给extend**************************************/
( N2 w/ M, N$ ]# M2 {, s3 {2 j/ @        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
" N+ ~4 B0 l+ n6 m1 H         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
' T8 h- @! v9 s! N  }/ `( [) n5 c& @$ P        pokeVariant[0].vt                 = VT_BSTR;
2 y7 K, W! K0 c* ?        pokeVariant[0].bstrVal         = valueStr;
+ b& x: N6 L( m) Q; n. w( x
! ?- |- S. h* L. J  l2 o* h* G4 n         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
& m, W3 D# w% X& `' V4 N+ M. g
          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
4 I! V* W& P# o6 \, L6 S        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
. W* Q9 ]* U. b
* B( [1 p+ ]; h' n5 q. K/ ?1 q//        Set the DISPPARAMS structure that holds the variant.

  @, l6 }9 f! r, [        dp.rgvarg                                         = pokeVariant;
& a7 w; R% _% R$ @' D        dp.cArgs                                         = 3;
; ]8 _: O- a; a- F" V) f* L0 ]! @        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

9 ]- P, I; k0 t& y( b8 [! t  O//        Call IDispatch::Invoke()
5 ~) e. L9 g8 _# a
' v+ o5 a  B# Q, E  o7 M        hr = m_pDisp->Invoke(
                pokeID,
) g; d# @$ p7 _9 z+ Z                IID_NULL,
, I- p2 A' P/ j" R1 I9 r/ x9 C                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
" N: u/ z7 u6 i, d. R6 F/ O  P                &dp,
* \+ P3 W4 `  u1 Y1 N                NULL,
! t8 s5 D! d+ y" `: K- L* L                &ei,
  x" C- b' }3 }7 q- X                &uiErr);
) r/ a3 d) Y& l& G: c
        SysFreeString(topicStr);
5 @: U* {) p$ s) |5 F4 K/ U: ]        SysFreeString(itemStr);
# [! h: y7 ]  U2 b* P/ I) U9 S        SysFreeString(valueStr);
8 h( u: P& a; B& E- ^0 m3 P% |/ @% E
; e; h# {# o3 O( h$ ?/ B* M' Z现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
+ G% z* _9 t  Z

1 W) V* |) P! {% {/ O2.这是request的程序
$ K9 F% F9 S; o. g8 o" g//  Request a value from Extend
9 h0 ]  _( o1 k# A0 ~//
; Q4 O$ i# U% `- Z5 L' l//        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.

% p6 X" J& b" X  k% V        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
% S8 H# F9 P  b4 J2 v         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
* i2 c0 k2 Y+ P2 s" F        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

( C% Y: v3 ~1 I: r% `8 }! f          topicStr                                         = SysAllocString((WCHAR *) L"system");
3 S: H" S1 R9 F3 H        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
4 Q! ]) t4 Y% O: ^& ^        requestVariant[1].bstrVal         = topicStr;
9 z# _6 x" q# a9 A7 u
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
  \' t0 D& g% B) j2 g% `        dp2.cNamedArgs                                 = 0;
) Q% K6 X/ W( f+ E# o1 \4 E- N. L5 u
& s& v& m2 g5 F5 _2 }/ S         var.vt = VT_EMPTY;
2 U* x. J4 }2 L
//        Call IDispatch::Invoke()

5 @+ X2 e, e; S( ?& U& I5 i# Z        hr = m_pDisp->Invoke(
  k4 i5 J# K4 |9 T$ x( Q                requestID,
: T5 O2 n8 v0 `( b9 S7 `7 i3 m- x                IID_NULL,
/ j& f& s. i7 X, X; ^! e                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
6 {* k. b1 K: j( X                &dp2,
+ I' N0 Y1 j; j! L- T0 @                &var,
                &ei,
* A; H% H0 B. R2 N                &uiErr);
1 U3 t+ a' s, S2 J4 ?. V# l! b
/ t, b4 g& f8 y        SysFreeString(topicStr);
/ M3 B( b8 p; M3 o& F- }) P) Z        SysFreeString(itemStr);
2 a" I( f: }8 N9 k! P; S2 m$ T% v6 L请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？