c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
9 E  W: v6 n  @' ?: O* o2 c( x! G3 hName = (WCHAR *) L"Poke";
  B; B( W" x/ s9 e# w8 E& K$ O; B                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
2 V& I/ c3 D0 }, O4 O# m                &Name,                                        // Array of names to get IDs for
5 a! w4 }' Y, L. Y8 u" Z; O+ i4 K                1,                                        // # of names in the array
5 \! y1 t5 l% T% j0 }: E                LOCALE_SYSTEM_DEFAULT,        // System locale
2 R0 U; m& G; e. i9 Y  D                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
, u: X9 |. p; g# q                return;
. I& b7 ]! n: E9 y: T% i4 l$ G. M                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
0 p: u& [6 ~# ~% _5 M         valueStr                                 = SysAllocString((WCHAR *) L"1232");
3 k# S( k! y2 N        VariantInit(&pokeVariant[0]);
9 u6 p' B9 F4 j" W( {        pokeVariant[0].vt                 = VT_BSTR;
" a. \- W% ]2 j" {0 |+ B' {% N% b        pokeVariant[0].bstrVal         = valueStr;
* M! F! D7 S1 Z' m# n1 ]
$ d0 j4 ~5 s4 J& b         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
, r& X/ J  N. I! X        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
& |. ^7 `  U: x+ o. w) V1 p        pokeVariant[1].bstrVal         = itemStr;

& k  [7 W& V) [4 q. ]          topicStr                                 = SysAllocString((WCHAR *) L"system");
/ l) k5 f8 w, h2 y        VariantInit(&pokeVariant[2]);
5 L" W' |  A3 ~) f* l* o% g5 U        pokeVariant[2].vt                 = VT_BSTR;
5 x' I4 w* u3 g% }# R: H3 r+ V, ~        pokeVariant[2].bstrVal         = topicStr;
5 G1 o/ T$ `" }" Z1 y/ G. ]) Z" N
//        Set the DISPPARAMS structure that holds the variant.
0 Z) p) N- g. u; z7 i+ T. \1 B
) B; x7 i# P0 L( ^* o) \" j+ m# M        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

! U2 Z+ Z# _. d2 L        hr = m_pDisp->Invoke(
5 C/ Z! \' k" Y                pokeID,
7 Q* {; @  Z& `9 _1 D                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
                &dp,
                NULL,
+ N; P" {2 Y9 M% y9 q5 t+ Y* G" C                &ei,
) E3 Q# ~* |# n3 }  y- u                &uiErr);

: k# `' q1 f2 O% ?+ Q! N5 O        SysFreeString(topicStr);
* |' u6 L" d5 c* k# h- [        SysFreeString(itemStr);
/ D( S  s2 Y0 o% T' a' q% D: {; v        SysFreeString(valueStr);
" ~' S4 F+ y4 m- p' f5 W, e
% U' n2 [9 D" @% l. c: I* R; `现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
) W- ^2 A. k+ @此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
. V2 t7 r3 N+ W, p! i//  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
. ?, c) G. D: f2 ~) J4 |//        BSTR into the variant structure.
) G& C8 ^: b$ [6 w
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
. u* f8 O0 W( }4 v3 F2 |: s* J1 `         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
9 k( y/ l4 g3 e$ _/ B        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
* e* p7 O7 d9 W, d
/ V  |- \, r- [1 n- `8 ]2 b          topicStr                                         = SysAllocString((WCHAR *) L"system");
# o; M  w5 _7 ~7 r$ w! P        VariantInit(&requestVariant[1]);
! A4 ], y- z) F% m8 [- k        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

3 R4 c' l8 d$ o4 C, W) @//        Set the DISPPARAMS structure that holds the variant.
7 @2 o$ i/ D# V
! _7 ~: O) c1 G# a        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
6 {+ i* i) \0 j9 M5 `" v+ ]        dp2.rgdispidNamedArgs                 = NULL;
& a, \/ D; s, b! M9 b, f, |        dp2.cNamedArgs                                 = 0;
; q- n" O! T+ A+ E( j  B
4 F9 l9 i  r2 B% o4 I+ E, D         var.vt = VT_EMPTY;

0 H- p  S+ z1 x- e- e  q//        Call IDispatch::Invoke()
! x4 Z+ `5 b5 Y+ }* e) \
        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
' e- v% s8 a" X                DISPATCH_METHOD,
                &dp2,
+ r/ `  x* }& E2 ^                &var,
" k1 \; b( E% ?                &ei,
                &uiErr);

( z  ^/ S1 j3 P9 N4 E5 C, w        SysFreeString(topicStr);
        SysFreeString(itemStr);
! V8 v8 u" a1 s, @! z0 y) j请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？