c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
4 O' Y! S- b2 T! {  |8 QName = (WCHAR *) L"Poke";
7 s# E9 r' X- V# M                
$ Q2 A8 {  }: G7 S        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
5 R4 d& Y9 [8 p( Y* L                &Name,                                        // Array of names to get IDs for
' J. d) S% ^% r& H9 `2 P3 o2 Q( U& h                1,                                        // # of names in the array
( F3 K) O9 D9 j* N; P" e# ?) y4 }1 z                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
  W4 R! X4 H6 r& L8 f6 ?* a                       
9 t- S! _' P# \1 {0 l        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
- w, ?, O/ Q' X9 [% s2 }9 ]( {) {                return;
                }
0 o: t8 O! ^" P7 l) W( X
$ Q3 i/ f: n4 G) c/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
: [' T! {' ?- G: a         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
9 f; X0 j3 C6 s" d' X        pokeVariant[0].vt                 = VT_BSTR;
1 H& \* S5 U, a0 [4 G/ \4 t        pokeVariant[0].bstrVal         = valueStr;
, _$ Z1 j' Y  j* K7 Q7 \3 g/ h' ]& B
* H7 T0 z' G' l$ u) T+ Z. W         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

$ l" |+ f7 `! {/ v' s, O3 m, _8 ~7 S          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
1 C$ k8 v4 a: j- g  Z7 l        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

9 w4 w1 D8 c, N4 X) d: ^; L2 R' n        dp.rgvarg                                         = pokeVariant;
7 X7 P& \" M1 z5 R0 Q2 d        dp.cArgs                                         = 3;
. L- i6 g. w( H4 ?. }8 {* s" O        dp.rgdispidNamedArgs                 = NULL;
9 l' X6 M, y( I- v0 ~/ m        dp.cNamedArgs                                 = 0;
1 J* H3 K$ m+ X2 r; b2 ]
//        Call IDispatch::Invoke()
7 A  {8 |. \: x4 p8 ?, N, Q' r
8 y* G  o$ Y( u* ~4 z# }+ C- ~        hr = m_pDisp->Invoke(
                pokeID,
  s# h; W3 k; G5 H* g, `. |, e                IID_NULL,
4 t. o- [* y9 O/ N                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
3 v1 S$ |/ Y2 D1 P                &ei,
7 l2 G" y4 T# Z9 o( e; E                &uiErr);
% z6 ~: b  p' u# D4 e' x  x8 I0 x
        SysFreeString(topicStr);
: O$ L$ {" c$ Z        SysFreeString(itemStr);
        SysFreeString(valueStr);
& N5 j& h9 v, \  s4 K
( n2 M8 J, P1 `' ]  F# P& H6 m现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

& }$ X- U. s  P( F
5 s3 L6 U6 M7 a) \2.这是request的程序
! v2 e% W) ]! z# k//  Request a value from Extend
//
//        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
' j( c5 C( a& I3 G# |//        BSTR into the variant structure.

5 e- E; }0 |; T* t- K9 S        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
) R4 \1 n9 x/ P: v        VariantInit(&requestVariant[0]);
( u! [: H  i! w! g        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

  z4 s0 k- s" Y; q, Y          topicStr                                         = SysAllocString((WCHAR *) L"system");
* J3 l- U2 A& d$ M        VariantInit(&requestVariant[1]);
% g3 h& D0 }9 M6 @        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
! x1 s. H4 z3 C' j4 l: w8 U
" d1 Q/ C! ?" }! H$ S//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
, ?2 C6 t) f- ^6 ~2 P        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

" |+ N$ _' m( m5 C9 u, i//        Call IDispatch::Invoke()
8 X% G& r' `4 X/ b, E) i
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
* m3 i6 r- s8 A" D4 Y                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
  H$ k+ x9 s6 @- Y5 F4 n4 j7 j) S                &dp2,
4 g" r0 e3 P3 r, x, ]: [                &var,
+ t% O: m) X3 }  v3 G& V                &ei,
                &uiErr);

' S1 Z3 y4 d6 B6 u- r9 o        SysFreeString(topicStr);
        SysFreeString(itemStr);
( g& ]! Z( J% l请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？