c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
/ U% K$ I9 g7 p/ b! i                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
$ w* T* C' j  w8 Y+ b. g1 X3 L                &Name,                                        // Array of names to get IDs for
5 H# M9 v4 d  v& l6 @$ U, M                1,                                        // # of names in the array
" F: m+ W7 p4 ^/ n8 _, s                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
! m% I* B! g4 R+ Z! V        if (hr)
2 g. K) `: S  Q# w5 h$ n" J  t                {
$ N9 Q) g2 c- \                MessageBox ("Get Poke Unsuccessful");
" b. A- s3 N. d3 X                return;
9 F$ N4 g: F& k  N+ ~                }
' ~" h  x, r  E' Q2 ?9 A- F+ E; j! l
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
/ K- V. l3 O1 _+ s% P5 E# ], q       
! Z/ p9 q+ V7 {6 A         valueStr                                 = SysAllocString((WCHAR *) L"1232");
' C( I" |1 i" `% R+ a        VariantInit(&pokeVariant[0]);
* T( G( M+ v& F' [1 C7 b& m) `2 q2 S        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
- B1 q. V$ T2 I: x
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
! Z+ @( M6 {4 ?7 d, }2 V        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
6 N. `3 ?9 b7 i8 u# X        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
" j* K( C0 K6 U" Y        VariantInit(&pokeVariant[2]);
5 `: i( g! p9 }1 E        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

2 b1 n, r2 l9 H! s0 f3 C//        Set the DISPPARAMS structure that holds the variant.
4 T* n0 J0 c* A$ U3 Z
        dp.rgvarg                                         = pokeVariant;
, s; N* U' X1 K- r) g& _8 H8 N2 n        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

; ~3 Z4 |) U7 @3 _5 [) J9 q//        Call IDispatch::Invoke()
1 k1 p# U3 C' t, w3 V3 {
3 P; p, d' h5 @0 c& E1 ?8 q* Z- I        hr = m_pDisp->Invoke(
+ L8 T' [4 n! E- _9 E                pokeID,
                IID_NULL,
8 l: {1 _5 a; t3 ~$ b' F                LOCALE_SYSTEM_DEFAULT,
! y) e! @; ?' Q, x! `# t                DISPATCH_METHOD,
                &dp,
1 @, e* a& a) n& ]                NULL,
2 w- M  k1 K- r  S' c& @2 k, X                &ei,
! ]% n; |# `: _$ l: g* l; {                &uiErr);
6 u  ^& b1 W8 `. D6 `" V8 {2 H: h) h
7 l; {! G$ {( e$ k: B% @        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);

" a  p% y9 w0 `3 x; T* n4 K8 Y现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
$ C2 o2 F7 A6 A; g此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
//  Request a value from Extend
" N: [, {' C, ~! U" p( A//
4 ~2 T% m. l+ i5 g( K: T//        Initialize the variant that will hold the BSTR.  Set the variant's
( Q1 V. ^) @  S, Q* x; c3 J//        type flag to indicate the fact that this variant holds a BSTR. Place the
' g9 L% B0 ]+ N4 m) J! q//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
; m0 R7 X6 ^, ~5 L; c         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
" \6 h+ O4 F  @& l7 u        VariantInit(&requestVariant[0]);
' y3 d. [8 K$ c        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

8 p; x9 v" A4 r+ r* }5 M6 }          topicStr                                         = SysAllocString((WCHAR *) L"system");
$ ~2 y, `& z% O        VariantInit(&requestVariant[1]);
6 }" X5 E. V+ H* F* [        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
; E* f" Y  w: G5 L6 u
//        Set the DISPPARAMS structure that holds the variant.
7 B. X0 r6 @6 }. V
        dp2.rgvarg                                         = requestVariant;
, U7 q0 t5 f$ Q7 h: E        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
8 W0 D) P  c$ Y4 v        dp2.cNamedArgs                                 = 0;
2 S7 p0 p5 v7 S+ V
        var.vt = VT_EMPTY;
7 e; @0 \) L3 M
//        Call IDispatch::Invoke()
# ~: [+ a: o0 u" q
6 }# W- ~+ R' `- A; b5 J/ \        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
0 _3 ~% \; O- P% O3 M& ]                DISPATCH_METHOD,
                &dp2,
) |* d, \0 s# j                &var,
                &ei,
+ B1 K# `/ J; J" L) ]                &uiErr);
; c( w7 z& `: W1 M% ~$ y
        SysFreeString(topicStr);
8 O) B7 V9 l' s  h$ h% }! M. e6 ^) g        SysFreeString(itemStr);
+ y+ C8 ^9 h- J4 C: x0 _0 M请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？