c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
6 d4 M" O# [7 f+ fName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
. L4 O2 i8 m. S0 k1 @9 y6 }3 X                IID_NULL,                                // reserved
) o3 B: d! f. P- k                &Name,                                        // Array of names to get IDs for
8 q6 d3 _6 ?2 T: |* l6 L" x% p                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
0 c- a# @9 f( s/ W5 J                &pokeID);                                // Array of IDs to fill on output
$ J( T" o6 b  h( B                       
        if (hr)
                {
6 V( @# @/ v) E6 ^                MessageBox ("Get Poke Unsuccessful");
! R9 u7 q9 Y8 `3 Q$ h( Z3 F                return;
                }

4 f% U' V9 W1 D2 }# M! \& K5 O/**************************传递数据给extend**************************************/
1 N# S) S6 L  p$ l1 r! e2 L        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
; [5 @, s5 `# P6 f0 g" X3 y& ]+ o       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
4 n5 }# n7 L0 p" c* ~        pokeVariant[0].vt                 = VT_BSTR;
8 c3 H. e! ]+ ]9 j1 c, c        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
. D  p/ K( r; j" b4 }' m0 ^        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
! R. H7 K1 F. |+ Y9 k        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
' L/ z( i) n  g$ M$ A$ Y8 |        pokeVariant[2].bstrVal         = topicStr;
8 X& Y/ T7 t3 M( f  @! |
//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
$ u" f; z- R: i% Y) M% y7 v3 j! l3 k) d        dp.rgdispidNamedArgs                 = NULL;
' u8 g& S- X$ D6 o& ?        dp.cNamedArgs                                 = 0;

) _, {6 Y% M0 M/ T  t* b8 A//        Call IDispatch::Invoke()
4 h. ?& t; A. ]: Q/ _1 {" c
        hr = m_pDisp->Invoke(
& ~3 k* e% D% K$ g                pokeID,
  r7 N- V: M1 h5 V+ m# L                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) W% }" b8 w  }+ \2 U1 N1 H: S                &dp,
                NULL,
* f. t* B& _0 t) O' Z                &ei,
3 \4 ~9 X8 Y$ }5 f+ T5 s; O                &uiErr);
) }; _: L8 F% I" }$ _
        SysFreeString(topicStr);
7 `6 f5 F& V# v2 h/ p% o        SysFreeString(itemStr);
! @: A% `2 v" l5 [6 c; ~        SysFreeString(valueStr);
: ?- U2 p: A/ ~
9 q5 C* {/ f" Z* V现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

1 b4 w& D: G/ A2 j1 s' H3 ?
2.这是request的程序
! m3 {8 K# T" s# x//  Request a value from Extend
9 S2 i% {  B0 M$ _! B( b//
//        Initialize the variant that will hold the BSTR.  Set the variant's
3 E; T# \( w; I; v//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
5 R, N# x/ J0 x  `& o. Y6 y
) d+ v, \9 C: J2 k- c- w0 k        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
: e" D6 X) b. j7 ]9 Q         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
3 V5 a$ ^- i: I. E$ L3 m        requestVariant[0].vt                 = VT_BSTR;
! h4 h  P) w2 [0 Q5 T        requestVariant[0].bstrVal         = itemStr;
$ @  ^' K2 e* b# A! M
0 w/ [5 [5 @  g" Q          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
* o+ }1 @+ b/ K' B* m6 J. S: ^
% b% e7 u" E9 {% l0 K! J//        Set the DISPPARAMS structure that holds the variant.

+ {* h2 K8 Q8 F0 C( p) a, x3 k        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
- a3 e' S% I# K        dp2.cNamedArgs                                 = 0;

" Q8 @/ s3 U  F0 D- a: M5 N' K! w# S0 C         var.vt = VT_EMPTY;
: ]' ?9 C' d$ U5 b3 X- X/ L* i
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
: D2 [, W. p4 c8 ~                requestID,
. u$ C2 J! v& _                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
1 D8 x2 u4 m1 |1 u/ J                DISPATCH_METHOD,
                &dp2,
# }3 l) p, d) f2 h6 x1 H                &var,
                &ei,
                &uiErr);

8 N6 d; v8 K7 m        SysFreeString(topicStr);
1 L' y5 z! J5 E5 }& b  V* ^, [        SysFreeString(itemStr);
) p8 G1 B; @; [+ N+ v# c请问该程序是获得extend里面的哪个值？
- Y; U% u6 H$ W5 {% v2 e( P如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？