c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
, R5 w0 [; U1 a' H# y: R3 e0 x- TName = (WCHAR *) L"Poke";
                
  q3 U5 C+ ~5 X6 m: l7 a& |        hr = m_pDisp->GetIDsOfNames (
$ q" d$ }, B9 `' L, o2 V* \                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
* V& Q; E/ X6 U5 s( ^$ R4 G0 Z                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
2 }: ~) q* m% w7 S6 a! j                       
7 c! q# k9 {. r, N' }4 U5 p        if (hr)
: @! V) M  Q4 T9 T' t# X0 W0 E                {
3 P" r" M! P/ z1 T. E                MessageBox ("Get Poke Unsuccessful");
                return;
: S3 a# d1 f; j5 ^7 L- }                }
0 ^  W6 x% h9 G8 C
' r+ I; M" b. Y  U( v" e+ W/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
6 X+ R$ @- ~: f0 G2 Z        pokeVariant[0].vt                 = VT_BSTR;
. v3 o" x. P2 ~6 H# u* D) ]/ m        pokeVariant[0].bstrVal         = valueStr;
4 w* ]; U! W$ o+ O
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
  A4 R0 V$ X* W" z8 i/ Q7 ]9 g        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

) {+ ?/ g+ K% t* `" z          topicStr                                 = SysAllocString((WCHAR *) L"system");
0 M+ Z! C, J: C8 ^3 S* D0 [        VariantInit(&pokeVariant[2]);
0 S/ y( R9 y6 x: u3 f( f/ |        pokeVariant[2].vt                 = VT_BSTR;
) |# f6 b$ m, r# R# d7 ?        pokeVariant[2].bstrVal         = topicStr;

, l! w% @* F) I& v% o//        Set the DISPPARAMS structure that holds the variant.

' i$ A5 N( ]. r% t3 b. Y1 I1 r        dp.rgvarg                                         = pokeVariant;
5 ^( e' B4 _8 ?) E; m) Z! O        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
; U' D7 O: ]) H
* E6 O' E. p) N: ?3 c0 \; a//        Call IDispatch::Invoke()

/ r  c" U4 u' G" a        hr = m_pDisp->Invoke(
) A0 p& {6 F- b8 t( h( ]3 F                pokeID,
                IID_NULL,
3 \9 b5 W2 Q  h; }# x, _! G                LOCALE_SYSTEM_DEFAULT,
5 t1 b$ M+ J! l, A' ]2 y                DISPATCH_METHOD,
                &dp,
+ A2 D% I# o" p  K/ ?6 y3 Y2 q4 f; O                NULL,
$ q9 q* Z$ H9 U2 I( P* O1 }4 `                &ei,
& A# m5 j; E/ x                &uiErr);

        SysFreeString(topicStr);
  j3 n  H: C$ F7 P: I        SysFreeString(itemStr);
        SysFreeString(valueStr);
; \1 e8 A9 T! @# i2 J% Z) ~7 ?
0 w2 W% `2 D5 @# O- ?' U0 p现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


" [: Q* h! P1 q3 t; p/ v6 ]2.这是request的程序
/ r6 h: B; Y- U9 q6 T: Z( C  B% v//  Request a value from Extend
( P& O2 i5 X3 k  [& B0 ~//
2 R! `; G* I2 ^/ `% ~7 s: q8 @//        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
, Q/ y* D+ z; \& C//        BSTR into the variant structure.
7 }7 O; I" E+ W0 i: ?, D2 w' I
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
$ u- j& i; i( Z% Q       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
! D, D6 \) }9 c) ~6 }! U1 o" ^        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
  d- B; ^/ A* u9 e! ~  s. O8 M
1 [3 E* Z) ?( A/ n' {+ U8 p- l0 o          topicStr                                         = SysAllocString((WCHAR *) L"system");
4 c0 m, @' ?% Z) a2 |. w2 y  w5 U. I        VariantInit(&requestVariant[1]);
8 w( j  |9 d0 n1 }: o6 N1 R        requestVariant[1].vt                 = VT_BSTR;
# ?" y7 i0 H. W# J3 N$ Q+ L' J        requestVariant[1].bstrVal         = topicStr;
- _" [: g6 f, H/ ~: [) U: s" m
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
! K. C# r! M0 i  J: j- n) r' L        dp2.rgdispidNamedArgs                 = NULL;
+ z8 s! T) q2 v, v3 W- M$ b2 ^        dp2.cNamedArgs                                 = 0;
7 ~9 ]1 l& x, |1 `9 f) ?
        var.vt = VT_EMPTY;
0 m* I+ o$ e2 U2 g* J
+ s$ x: n4 Z' U: E( ^8 m1 ~" A//        Call IDispatch::Invoke()

$ t! t( a. @5 L8 T$ F1 C        hr = m_pDisp->Invoke(
4 E$ Z. u- Q9 H: ^7 ~                requestID,
                IID_NULL,
; G+ H) L  f- ^* t% W* m                LOCALE_SYSTEM_DEFAULT,
$ d$ s" X7 w' C! l1 U9 ?* m                DISPATCH_METHOD,
                &dp2,
; G  |* {$ w# ^7 D9 T                &var,
7 ?/ s) g8 s2 @. N& s: V3 A                &ei,
                &uiErr);

  W% N: |5 @, `% F" C        SysFreeString(topicStr);
        SysFreeString(itemStr);
( H& B; t; D  n- ^) R9 ]请问该程序是获得extend里面的哪个值？
2 L1 y/ R* k- h& P. q如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？