c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
6 _0 [* [& F( V4 j- CName = (WCHAR *) L"Poke";
3 P3 u9 c* f4 ^/ m4 |& E: U; G                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
! Q$ y; d# _: c7 }0 ~                &Name,                                        // Array of names to get IDs for
% ?2 t" {( Q( h, }  C                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
* a5 W( j& w+ x                &pokeID);                                // Array of IDs to fill on output
                       
  S" \  Y0 ~' ]. N0 W- B- B& n        if (hr)
% z; b3 I/ Y" L% h1 Z; V. O# _                {
; F/ @9 Z# Y3 P                MessageBox ("Get Poke Unsuccessful");
. g5 c+ A2 [7 y1 `- W& y                return;
+ c- o$ X  f) {' L8 p- j0 D* K) _3 ]                }

3 E4 f) M5 F/ K/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
' i4 H; C9 Y1 o4 \       
; ]: n2 T: j/ J/ m         valueStr                                 = SysAllocString((WCHAR *) L"1232");
+ J5 j( w" i6 {; i        VariantInit(&pokeVariant[0]);
% l& v1 p. D7 \3 S6 x/ J/ f        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
* N' o/ U  c/ J, i, }9 z2 L        VariantInit(&pokeVariant[1]);
* j' k2 q& \1 E, a( N) O6 C0 w        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
7 X4 e! N+ Q' d5 g        VariantInit(&pokeVariant[2]);
3 a# ^2 A8 M* m8 x1 U        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
; e/ G1 O! C% ^$ \
# m% ~- G* {/ d7 ]* |//        Set the DISPPARAMS structure that holds the variant.

% k1 L$ \2 _( w& h0 Y' L        dp.rgvarg                                         = pokeVariant;
: _' _2 L2 \7 W! h* D$ g4 ^& A        dp.cArgs                                         = 3;
4 J5 w1 \& {' E1 R  L7 j        dp.rgdispidNamedArgs                 = NULL;
+ b, T2 |9 v" ^1 j        dp.cNamedArgs                                 = 0;
: U# m: t3 g' y5 x  \* `5 d- [
//        Call IDispatch::Invoke()
- E$ c0 \9 T1 I
, v! @# V- f. \        hr = m_pDisp->Invoke(
* r! _# `, A1 i5 O# J                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
/ {8 f! j" C$ H3 H  ]1 f2 i: T8 }                NULL,
" L$ M; c# {7 v, t* n                &ei,
                &uiErr);
" \+ J" M* ^- ], l- d) O; E' D
$ ]) [/ B  t% Q* C; Y# @7 t        SysFreeString(topicStr);
5 `0 a9 N2 P) |8 {% h        SysFreeString(itemStr);
        SysFreeString(valueStr);
+ O# B2 _1 a0 W& L" ~
9 R# l4 d% _1 v+ e7 K现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
1 n" i' `/ z2 z1 D" f' e

2.这是request的程序
2 ?2 f$ L4 V7 d//  Request a value from Extend
2 E' e' d. D# d3 D% Z- o* v8 N" S1 \//
//        Initialize the variant that will hold the BSTR.  Set the variant's
* W: M3 g7 ^# Q6 v0 j( k' L$ \* n. P//        type flag to indicate the fact that this variant holds a BSTR. Place the
- |3 S& o- M3 M# U& e8 r0 v8 }: j0 W& s, \//        BSTR into the variant structure.

( N& D7 E! @/ R2 A; q( L        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
1 j* b5 [0 f; K+ o        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

7 k" \2 O% @& @; i0 ]& s7 U          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
3 O! ^0 x4 w1 K9 n' y+ v" S
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
: T4 O2 p, I8 J8 Q+ r  h        dp2.cArgs                                         = 2;
! U8 G+ x4 c- o, l        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
/ A. q3 }" X3 D  l4 ]5 t9 h( p" E
% Y4 Z& k8 j- _: j8 S//        Call IDispatch::Invoke()
' u% P+ v* ^+ z9 ^+ j& [
/ f+ i7 O  D$ T9 l        hr = m_pDisp->Invoke(
                requestID,
  I- z2 ?6 F& X8 K' O1 r                IID_NULL,
8 ]- W# q0 B1 S6 y: z                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp2,
- K4 t: ]8 \9 N; M5 L9 c! M9 ~                &var,
                &ei,
9 ~$ Y, `) q4 l; M5 r3 d! w                &uiErr);

        SysFreeString(topicStr);
2 v! P' h! @$ x& d  s2 v% s        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？