c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
. ^, L8 D8 }; C. zName = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
4 l$ _: p0 i- D8 Z7 i& J, O                1,                                        // # of names in the array
  T- c- J; |9 i& O                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
! N; e; C- K. o+ k        if (hr)
                {
9 |) J( K$ H; q1 f4 }* J                MessageBox ("Get Poke Unsuccessful");
2 `$ F8 S! J( r                return;
                }

* a! u1 U4 N5 }/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
' |) U( b/ v) |+ p5 s       
4 y0 S# g3 T7 U         valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
" ]0 s4 r2 A1 k        pokeVariant[0].vt                 = VT_BSTR;
; {) {! ]# ?+ U0 X8 ~" d4 g        pokeVariant[0].bstrVal         = valueStr;
5 {, f+ s4 ]6 z. n, O
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
' H- _7 n, {; F* X, Y        VariantInit(&pokeVariant[1]);
+ F) H4 c2 A- Q8 P& W4 Q& s        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
+ X, a: B' d! ^3 b, }
, r+ {6 D( F5 U4 j! J          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
1 E, Z: L$ N1 z        pokeVariant[2].vt                 = VT_BSTR;
5 e5 l# K, ^4 _2 G- h4 ?: v, J# V6 p        pokeVariant[2].bstrVal         = topicStr;
# [: g0 J$ u, Z2 }
//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
/ R8 D8 M9 L# M2 ~        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
* R' [6 n6 f# _. R5 W
4 x2 ~+ h$ _% T; r' v//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
2 e* u9 s' m; p                pokeID,
6 T" A/ ~4 c  D1 }3 M                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
0 {" d+ V6 ?1 k4 V8 h$ `( q; T2 _                &dp,
                NULL,
                &ei,
                &uiErr);
$ g$ }8 I2 R% C+ g
& h2 p; d; A7 H$ Y3 ?        SysFreeString(topicStr);
/ q5 t( b4 B. _# C! C1 H        SysFreeString(itemStr);
        SysFreeString(valueStr);
; O! q  k3 C$ ^1 J8 l1 O' M
$ M/ h5 {+ s" J" q& G" q现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
) `" U" I/ K0 f6 X2 n8 K此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
: U: ?& Z  O3 h) L
7 [- C& M. h9 Q& V% T
1 A- b' i/ d- t$ ~2.这是request的程序
! L7 J& N2 g1 @, {, E4 N: u/ [6 y//  Request a value from Extend
8 F8 U2 N' v8 Z- f//
//        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
4 D/ v5 I  y' z8 M# z//        BSTR into the variant structure.
; A( S4 G6 r4 U$ u3 n$ L& O& @
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
. p: T- Q1 b, C- X$ \! E  E! m         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
! |6 Q+ {. N) i4 Q+ m
& O; f& `7 r' f/ @" {//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

3 W/ D) m$ D7 }4 G& J3 g! v         var.vt = VT_EMPTY;
+ r7 r) |6 U# ]! _5 O& p: j
//        Call IDispatch::Invoke()
8 _4 ^$ ^0 b5 \3 z% ^
$ y, o) Y5 c5 s" S        hr = m_pDisp->Invoke(
2 o4 L8 E$ J: Y0 H                requestID,
                IID_NULL,
2 H1 A! q: f7 Z' v" K4 |                LOCALE_SYSTEM_DEFAULT,
! j* c7 b5 r1 Y                DISPATCH_METHOD,
                &dp2,
- m0 Z4 T  Z  B6 T                &var,
                &ei,
: j5 K5 N* e) x: m1 X# Z' @                &uiErr);
. {0 f7 c' F; G, I* m4 ^
        SysFreeString(topicStr);
. ?' c- A$ U# w+ C2 X        SysFreeString(itemStr);
2 A# g$ N: u4 Y& r2 ]) D1 n2 {请问该程序是获得extend里面的哪个值？
+ `4 }: ~/ {* ?0 Q7 r3 C如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？