c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
$ U! [0 b! z5 W" E3 {! EName = (WCHAR *) L"Poke";
. O, r3 A9 D/ g* A. n0 \, L0 a0 u% M                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
( b/ N+ s: F' b! M3 f                1,                                        // # of names in the array
6 o3 ]- R1 u. l0 j! {7 y& U0 M                LOCALE_SYSTEM_DEFAULT,        // System locale
3 ?* q" x5 g" Y! e9 V                &pokeID);                                // Array of IDs to fill on output
                       
/ A' ~" z: k$ n* Q4 S0 Y, w        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
! q3 E) C# r6 |                return;
& o' [* `1 a8 ~9 Q# \4 }+ X                }
+ m/ ^  r+ e( L" T; Y0 n
5 Y. H: v% q6 f% Z! O! N, [; k1 m/**************************传递数据给extend**************************************/
1 }; U/ I+ T: N        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
- p7 A. A, Y: w; t5 ~) I       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
% L( A/ g  E2 U5 G7 r        pokeVariant[0].bstrVal         = valueStr;
2 i" P; ^# r8 L
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

# \. A  ~  @/ L+ A8 e, ~$ Z8 I          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
( U/ ^% V$ |( L# C        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

+ |, `5 ~  M" y1 k//        Set the DISPPARAMS structure that holds the variant.

+ _9 m, a. p/ E' Q" P9 V, a' l        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
/ y; v: ]" j0 T' q8 J5 h6 N4 v4 ^        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
7 r1 ?# g( l, D1 O; V
' W. Y& q) w1 z8 G1 R; E//        Call IDispatch::Invoke()

1 S3 V, ?3 A# t* o$ b        hr = m_pDisp->Invoke(
. E) U) z% F# ]" W3 P                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
+ d: _3 N% O) m  i& p                &dp,
. s0 {% O$ Q' |3 r) E                NULL,
0 p# c# y: _+ p: Q; f" l# z                &ei,
/ x( k1 n; q6 m- E% r2 b. }2 F2 @                &uiErr);
2 }# ?5 g! `$ i, _) ^
        SysFreeString(topicStr);
- E4 q; C& I1 n% t+ n2 G8 B9 a        SysFreeString(itemStr);
8 ?2 E" j+ ]( n0 ?0 @1 O' O1 j' L7 p        SysFreeString(valueStr);
, H- i/ c6 ~" C1 L6 U+ }, `( b* d5 ?! T
; m/ S  S. g; G" }0 R5 `9 ^现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

& [/ {2 I$ F" t3 X1 q
2.这是request的程序
% W( D7 [5 C4 y5 B0 I3 `& M2 M$ p//  Request a value from Extend
//
* X! L2 a+ a; a! M  X8 M( q$ s3 R( h//        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
+ |; A8 u4 ?5 u& u' f4 g: h9 U//        BSTR into the variant structure.
' i% ^3 w# W. c9 M9 |3 a. \
; j0 E( D5 K1 u        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
: c. b4 d3 v/ D         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
9 O" m8 n3 L8 B. C9 R0 {, X3 o        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
0 T0 Y3 M* L2 ?; G- x* y. y) Y        VariantInit(&requestVariant[1]);
- m7 Z6 e) \  Q; E% {        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
2 ^7 V% H2 K+ f; Z
8 u* t/ F0 e3 `% j  s2 D) D# f        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
; ?) a+ N/ g/ S! [& p- E: H& G        dp2.rgdispidNamedArgs                 = NULL;
  B' }5 Z$ M! }, Q4 Y* a% L# A3 s        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
. H. D5 l; ^1 |3 z$ v
- f. m9 Q7 U, N. Q+ I5 _//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
, ]: H. l. O/ t" x9 W8 Q' v                IID_NULL,
: ~% d7 W* C4 Z                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) {) r7 Q3 D" Y3 [                &dp2,
                &var,
! `5 }2 x; W7 f9 J                &ei,
                &uiErr);

        SysFreeString(topicStr);
& x* Y& G- Q7 E' Z% _        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？