c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
! a  |, I, }% k$ FName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
* _! j; D8 ?1 j; Z/ k2 h/ u                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
' A' `5 f$ Y' T, Z+ T) `- |/ Z                1,                                        // # of names in the array
1 V6 t# ?1 D& H: X$ o/ n* k) t& ]9 V9 K                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
% M1 q+ `. k4 }  K8 h. ^+ q* ?                       
: A0 h6 d/ S! J! S        if (hr)
# U8 [9 U: N' e! g% Q                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }

0 Q* I* g5 {* Z; J5 y  g5 N/**************************传递数据给extend**************************************/
/ I8 E, I) |& o/ s; V# |9 s# D        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
, H, {' Z- K: V" |# t. {% F       
; d9 q( p3 i3 o0 B* F+ c         valueStr                                 = SysAllocString((WCHAR *) L"1232");
( x: L  ]; ?+ w$ Y6 z, q9 E        VariantInit(&pokeVariant[0]);
6 {- E1 m1 B/ Z        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
8 d# z# s& }) z- l
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
4 v- d4 B3 P0 @. i: i3 R4 a        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
) p6 [6 s* ?9 h' K2 U        pokeVariant[1].bstrVal         = itemStr;

8 \! f. _1 p6 {8 L# ~$ O          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
1 b; ]$ P$ V. V        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

% t0 K% v! S4 {5 p$ b5 ~" `        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
# P& P4 k3 b# G        dp.cNamedArgs                                 = 0;

  A: X0 ?9 q0 ?, |, _* J//        Call IDispatch::Invoke()

) d4 [% I  O2 }' ?        hr = m_pDisp->Invoke(
                pokeID,
0 q/ V# }/ e1 K, i: V& `+ h                IID_NULL,
6 K, O) a% G" k& G                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
+ W- w4 [& J% s7 f. u; I: ^$ z% U9 j                &dp,
                NULL,
0 h8 D* H9 t. F- y, b0 l                &ei,
- |( \. C6 |# {" K4 X* ^& }                &uiErr);
2 m6 U) ]; S( A" Z* k
' b2 W% ?! t# C6 z/ q        SysFreeString(topicStr);
        SysFreeString(itemStr);
9 ^' ]6 p4 J. o, g" `, ]        SysFreeString(valueStr);
2 w0 j+ R' @3 P/ j* s2 m
% A! l) Z9 O# i8 p现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
* p. J- z  R: ~- X1 F) A
9 G/ J4 K( r, R# ]& U
2.这是request的程序
//  Request a value from Extend
//
//        Initialize the variant that will hold the BSTR.  Set the variant's
' G$ M9 M. o( n1 n+ d//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
4 I# k- L- h0 g/ S0 |
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
+ P9 n" Q, w3 T1 @       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
' w6 u9 O! [& F3 A& [        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
- I6 A1 y4 u+ t6 a  ^        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
  C+ E7 k, U: q6 [! C8 a* l        requestVariant[1].bstrVal         = topicStr;

$ l7 Y' k2 C' W7 V' T$ B! }9 M//        Set the DISPPARAMS structure that holds the variant.

# U8 q) p0 T! K5 q$ N        dp2.rgvarg                                         = requestVariant;
) C6 W+ l/ ?' C4 f; |9 u8 `        dp2.cArgs                                         = 2;
& _7 V' ~& R4 C4 }  M* P8 k. L8 J0 a3 F* X        dp2.rgdispidNamedArgs                 = NULL;
1 J$ Z* J* C1 j. ]  b9 a, q        dp2.cNamedArgs                                 = 0;
1 j1 Z8 g- g( O- Y" ]: c( Z+ N" }
+ @) s; m4 `5 B, j8 I8 {+ {         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
. {! ~9 W% V6 k, }/ u  K: B% s
        hr = m_pDisp->Invoke(
8 e  ]2 H) l# C9 s                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
, `5 P" j! I" \- N- F+ ?9 ?0 B- e                DISPATCH_METHOD,
9 l5 u( f, V# w/ Q. O7 q9 Z, i& S5 y  A                &dp2,
                &var,
                &ei,
- Y( ~5 Y' `' q' k0 |                &uiErr);
+ m# W; @( r3 x
( {' l/ p$ e/ }5 o$ I9 T        SysFreeString(topicStr);
' _9 R! |. ^. E$ b- I& M* R& [        SysFreeString(itemStr);
  [5 P4 b% ]: h% A请问该程序是获得extend里面的哪个值？
) e" v7 U+ ]+ O( N$ Q. `# m2 f如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？