c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
+ L1 P  ~' E& a                
# B+ Q6 J! G9 D. q- A+ |) u$ V        hr = m_pDisp->GetIDsOfNames (
) a6 H7 r! i+ P3 w* E1 I                IID_NULL,                                // reserved
$ r7 `' H5 I# U/ _2 ~- ]) d                &Name,                                        // Array of names to get IDs for
9 W7 j6 D* \, [                1,                                        // # of names in the array
, G; }2 j" Q& {  t4 @7 v8 `                LOCALE_SYSTEM_DEFAULT,        // System locale
  Q+ V2 A) ~/ s                &pokeID);                                // Array of IDs to fill on output
8 ~: ^6 q6 s) p- U" |/ |                       
. r- R' b% W# Z+ n$ k$ J        if (hr)
* R3 X9 B2 s' L! v/ `( ?                {
                MessageBox ("Get Poke Unsuccessful");
& \6 i+ ~8 E% D( H; f- d9 N- c* p& @                return;
                }
7 ]0 o1 d6 g8 w  r/ X+ j$ v
* f- E' B4 F" @& B% P/**************************传递数据给extend**************************************/
7 _/ w* u. T6 p        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
% g1 X9 p; V0 I  ^3 ?4 X         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
% {- C3 _7 k  C( ~" }        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
& y. h# C9 n9 H* I0 ]% e* K
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: O$ \: Y/ U! F1 {: Z$ m8 k4 U        VariantInit(&pokeVariant[1]);
$ k1 n% K7 }. K" L        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
  C. ]1 l9 r$ c
8 n* ~# [9 k' U0 Q          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
- N2 j! v. S) D7 g+ _        pokeVariant[2].vt                 = VT_BSTR;
) E( J5 E" v2 I  S4 a6 N( y        pokeVariant[2].bstrVal         = topicStr;
& I) _; O, t) H! d' f3 P
//        Set the DISPPARAMS structure that holds the variant.
& @( Z  y1 x8 R3 K6 O3 `1 b
" o" w" u2 J5 b' g        dp.rgvarg                                         = pokeVariant;
& ]0 M$ c& k* e        dp.cArgs                                         = 3;
% z$ T7 m: o; U& x% D6 P- p7 L        dp.rgdispidNamedArgs                 = NULL;
9 q0 p0 y$ b8 h* |5 ]% h        dp.cNamedArgs                                 = 0;
4 ^: ?# ?# H2 p% ]' l- F* O
//        Call IDispatch::Invoke()

; D) y  U( g& }' B- m: |% t& P        hr = m_pDisp->Invoke(
                pokeID,
# S% g3 _  I' D8 U$ \- b% O                IID_NULL,
4 `4 X0 W( A/ R7 w                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
5 U- j% E& ^4 p& I( ~6 w7 _                NULL,
                &ei,
  F7 T; e5 u7 M5 r  I                &uiErr);

        SysFreeString(topicStr);
; |& Y3 h4 t2 S/ G7 M        SysFreeString(itemStr);
        SysFreeString(valueStr);

现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


7 ?8 n( Y% k9 {6 R8 S/ F2.这是request的程序
0 r4 T1 ~# Q) G( ~* A- a' e, N//  Request a value from Extend
7 D, N$ {: U* q8 D. O7 v//
9 Q% W' Z( V6 C: @1 q  X//        Initialize the variant that will hold the BSTR.  Set the variant's
0 n5 p9 F: m* x- N//        type flag to indicate the fact that this variant holds a BSTR. Place the
7 Y+ w; j0 g+ P% u6 _//        BSTR into the variant structure.
# ]# k- e) {, {  J3 N
/ l: h$ b' `' W0 ]# R        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ y. Z; M! @( G! k0 c; G$ q        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
: N2 [% A* c$ ~  Q( S( e
. q' D. o+ r% h% n& Z          topicStr                                         = SysAllocString((WCHAR *) L"system");
  L7 R( E! G* q5 ?4 W" r: k        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
& h9 Q2 v) R: Q( k5 Y        requestVariant[1].bstrVal         = topicStr;
; ?  @" F5 V0 P+ \' |( f# V8 H
4 X& E2 \6 U3 u' ~0 q//        Set the DISPPARAMS structure that holds the variant.
: K! N7 D1 Y  Z. ^$ v" X9 J4 r
0 n+ M' u' R  {6 R! r( m/ q$ L7 a% k2 f        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
6 ^8 P9 S" d6 X+ b/ E3 X2 O        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
- i* c& _" r; k4 U
7 f, i+ _1 x. n0 r//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
1 r) b9 g. b: l; b, v! u) z; u                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
0 v4 M( Y+ d* r3 C; i2 M8 `                &dp2,
                &var,
                &ei,
                &uiErr);
5 O* |8 T- E# G' z
  u# y4 R* H9 ^6 b9 ~0 c- s        SysFreeString(topicStr);
" w0 m7 M5 f; a6 \: e9 E        SysFreeString(itemStr);
, \4 I2 M1 G1 A- s. i6 r6 c请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？