c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
" o: x- M' z) {( f                
2 H: D6 P" [8 a* a- f1 ~        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
  k. O3 C$ ~2 V, S6 V6 J: i! v: w& a                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 Q$ |" v! ~* \; Z3 _                       
2 {* v. N  ?- j! h7 [        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
& U/ \2 Q; e/ d2 O3 W3 f' v
/**************************传递数据给extend**************************************/
) ^0 A" U  C% h        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
5 |8 ]- _6 U1 K& A4 s         valueStr                                 = SysAllocString((WCHAR *) L"1232");
6 O5 x( p' ^0 T3 g- O9 u7 N        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
' M' E1 l6 w% S        pokeVariant[0].bstrVal         = valueStr;
- w" U$ |6 ]- f1 U- T4 @
: L) ^: S; o* M8 q8 D; C) N         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
1 |; E6 L( O5 p1 j5 ]  G        pokeVariant[1].vt                 = VT_BSTR;
' d0 w% `7 O; n( ~8 K        pokeVariant[1].bstrVal         = itemStr;
  _- n* H2 K% \5 C- {8 G6 @
. R: X8 q5 I% S! Y3 S  Q          topicStr                                 = SysAllocString((WCHAR *) L"system");
' L& _8 z+ {. `4 m        VariantInit(&pokeVariant[2]);
. {4 f6 |5 G' u' l        pokeVariant[2].vt                 = VT_BSTR;
( W* A. R" `( A3 G        pokeVariant[2].bstrVal         = topicStr;

9 `" U+ e5 z+ G: e9 r4 x3 f//        Set the DISPPARAMS structure that holds the variant.

( B: ?5 X! Y0 V1 I        dp.rgvarg                                         = pokeVariant;
0 X' ~6 g5 P! l$ A        dp.cArgs                                         = 3;
" ]: t% L" [. M/ R        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
$ F+ K( k0 v: |/ A& Q1 X
! p" k' [- Q, R. i//        Call IDispatch::Invoke()
% A$ c/ v& t/ ~: Y4 e9 a( {
        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
8 h9 H1 F' l9 Q! V& ]% M0 n$ z; ]                LOCALE_SYSTEM_DEFAULT,
% m: O* d9 O1 ?: Z* \8 U                DISPATCH_METHOD,
                &dp,
( c3 G: J1 Q, T7 ~- D* Z% D0 D                NULL,
* t. ~1 l- [9 V$ H* o                &ei,
                &uiErr);
$ Q0 Q; m# ^$ t- G3 H. x& G8 \
1 j. m5 q: ]: S$ x        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);
0 x6 g0 o& ^$ o0 e
- _- m: i* x% O; W现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
# I: H, ^  R2 W9 W& |: l* B此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
; X* L  Q9 D! v
. h; V; @6 X9 r/ Z7 ~5 n2 z$ J
; z! y  w, f) F9 g2.这是request的程序
7 y! \% x+ a  S0 U1 J" b//  Request a value from Extend
) V3 u( H( E& K9 k//
//        Initialize the variant that will hold the BSTR.  Set the variant's
! E, ^. ?0 l6 D( Q* T6 N3 }//        type flag to indicate the fact that this variant holds a BSTR. Place the
1 @" h. S, r0 d/ z* T' p% i//        BSTR into the variant structure.

; h1 b6 E0 ~4 `; U, J& n        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
- I& K: J: Y; @, l       
# {+ R" P: a& h0 b         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
7 F- M/ H; E/ c4 X' z8 G) R        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
0 L2 H) t* T9 V# h+ z        requestVariant[0].bstrVal         = itemStr;

. R* p( o  N' C5 c. s9 y* J          topicStr                                         = SysAllocString((WCHAR *) L"system");
% L0 w% Z0 ]0 R9 @9 B, X& l        VariantInit(&requestVariant[1]);
' D( a* R" i) e        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
3 ~# L: g% I4 U2 c* e, J  ?6 c( L
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
, i9 i1 S, U0 ]2 N6 b2 `! r        dp2.cArgs                                         = 2;
) |, U7 T- u$ |( u# x5 w        dp2.rgdispidNamedArgs                 = NULL;
* m3 `% a0 K1 @1 g% q        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
6 I1 f, m7 s5 D; C7 T7 S
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
; g6 `) M/ B, t1 |# x                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
( S6 B- _4 e. ]4 B6 u* s; x                &dp2,
                &var,
5 z/ p2 P  l' T+ O2 h                &ei,
                &uiErr);

* t/ s$ Z& X- O  C        SysFreeString(topicStr);
        SysFreeString(itemStr);
. r% q4 G6 b" ^6 U% B请问该程序是获得extend里面的哪个值？
. p& u0 n- y9 O! g; {: u如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？