c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
0 ~: ?2 }' h. a! C9 h; q5 G  {Name = (WCHAR *) L"Poke";
                
        hr = m_pDisp->GetIDsOfNames (
; a* w1 R. O, D2 H                IID_NULL,                                // reserved
' d' }5 g. s! M6 A/ l, v                &Name,                                        // Array of names to get IDs for
; M6 v5 d5 I' ~- S$ s                1,                                        // # of names in the array
0 v( U6 o! E) Y                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 K% S* u& y. _* F' U) ^: ?                       
        if (hr)
                {
0 X" B7 K3 O" T' A( f                MessageBox ("Get Poke Unsuccessful");
                return;
                }
8 Q7 y! m: n+ R
/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
) ~1 z, X4 p7 u( f1 ?$ I        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
6 ^) W9 v. W4 o! C* L$ u" i4 e
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
( D' v+ E# R. H1 `' N        pokeVariant[1].bstrVal         = itemStr;

. z0 k, @) j- ]2 A" I4 V( W3 f+ q- A          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
2 V" p& L! L) R' \        pokeVariant[2].vt                 = VT_BSTR;
5 E, Q3 l: M( V( U/ [        pokeVariant[2].bstrVal         = topicStr;
1 p$ Y' B8 x! w# u; h
//        Set the DISPPARAMS structure that holds the variant.
. V, r* t7 A7 i7 j/ T* W/ |3 G
+ R9 o7 g/ N: g; q6 w' N        dp.rgvarg                                         = pokeVariant;
# w: p7 T8 l( ]5 m2 O        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
7 G# ?( \1 q: u1 _7 w/ {        dp.cNamedArgs                                 = 0;
3 B# X6 `) B& Q, V3 s
//        Call IDispatch::Invoke()
/ W- r4 v& N$ D: x0 f2 _9 W
        hr = m_pDisp->Invoke(
                pokeID,
' q1 h, L/ y% ^9 e& u                IID_NULL,
7 K0 z1 X, e7 O. M9 u: f+ j                LOCALE_SYSTEM_DEFAULT,
0 N" U/ c2 ]# m: W( ]                DISPATCH_METHOD,
$ e- ]5 U2 P8 O; H" o4 |6 j                &dp,
  z0 _/ p, g) D* e; f. V  c                NULL,
                &ei,
; ?4 k! P1 s  A. Z  j+ T                &uiErr);

+ F; z4 |: E3 d* m# X        SysFreeString(topicStr);
        SysFreeString(itemStr);
4 W# |4 y6 s: n6 ]        SysFreeString(valueStr);
3 @: W7 U" s: P" ^8 M& k/ I3 y# o
- m7 Y5 {4 c: B* @% T- E现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
# b" [+ p! J1 S& P, B( @, E
% b) d( E4 j( U+ S
2.这是request的程序
//  Request a value from Extend
8 r2 E$ ~4 P& p: I9 E( a//
//        Initialize the variant that will hold the BSTR.  Set the variant's
/ z. Q* U1 v" a( J0 }//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
" `" u) E+ b; {
( x. w' V& ]" f; m% c1 J8 [        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
: q) K2 i; Y3 `        VariantInit(&requestVariant[0]);
5 z. ]- i5 W! W  _: v7 S        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
( q! p+ ]7 Q6 j! Q3 G8 i
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
$ _$ K5 {/ E$ U& l) G' A  T        requestVariant[1].bstrVal         = topicStr;
5 G8 C! v- q' B1 j0 [
( N+ t( i5 Y; a' b//        Set the DISPPARAMS structure that holds the variant.
, V( u% j1 U: {& H2 V
        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
/ Y5 _4 T- }% S7 \4 T$ v/ T        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

& u' Y0 Z' m) d% r$ F6 O: P//        Call IDispatch::Invoke()
9 C8 W* a) E/ n3 A6 P* \# h/ C
        hr = m_pDisp->Invoke(
1 k$ C; N4 F3 y6 [8 n! M3 e                requestID,
6 l% u2 l. `) ]; N0 X, g/ U                IID_NULL,
" @+ j2 o) L; @5 p9 ^9 e1 P                LOCALE_SYSTEM_DEFAULT,
) V% A- ?- s. x1 y5 E/ j5 C                DISPATCH_METHOD,
9 |# |0 |$ x3 [) j                &dp2,
                &var,
2 L3 T1 s8 f  e8 j/ k                &ei,
                &uiErr);
- f1 V& R3 ^& h/ S- a- P
        SysFreeString(topicStr);
        SysFreeString(itemStr);
5 c5 ~8 d6 v) I8 u1 b请问该程序是获得extend里面的哪个值？
3 Z$ P7 ?6 e, I/ K9 {1 m如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？