c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
& W5 M' I; }" S0 F  F% K+ @Name = (WCHAR *) L"Poke";
* d0 Z; p3 Q! R* E1 q' M$ p                
        hr = m_pDisp->GetIDsOfNames (
% P* }: c5 }6 u) B+ i7 u0 ]                IID_NULL,                                // reserved
0 M; [, q! Q! I' g' [                &Name,                                        // Array of names to get IDs for
$ ~1 J  ]  N( F2 g! ]9 V0 b                1,                                        // # of names in the array
0 s' B4 F* J+ Q3 x& y0 z                LOCALE_SYSTEM_DEFAULT,        // System locale
7 D9 g, F7 Z5 D7 g                &pokeID);                                // Array of IDs to fill on output
                       
5 ^; @2 A% h) w. M2 t        if (hr)
                {
/ F) L. u; v4 s4 V+ W7 N+ t: R                MessageBox ("Get Poke Unsuccessful");
                return;
6 k- G, O$ R- e, m0 C                }
! O2 U" R; e' n5 o6 |4 H
/**************************传递数据给extend**************************************/
- j4 r+ B& X& i        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
! o5 w1 C% k2 A; c+ m1 h) Z; ^0 M2 k       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
! W# Z7 v' y5 o! _1 R3 Y. A, F        pokeVariant[0].bstrVal         = valueStr;
: o# k+ w! D5 u# L7 ?/ ~% K  _
; D0 k! N& m. V9 b7 i5 K         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ j( S/ p% ^" B- B. m        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

+ m: ~7 F3 X. S/ a0 \4 V3 ?          topicStr                                 = SysAllocString((WCHAR *) L"system");
/ h$ h: ]8 H% f( A; }9 i1 k6 g        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
/ w$ f: y# e' e1 J
# n, D; |+ h5 W# q; z8 X, u  H//        Set the DISPPARAMS structure that holds the variant.

) G4 p3 h" F3 W2 D, L  n/ N2 }) q        dp.rgvarg                                         = pokeVariant;
+ v9 u" _' V0 R' j! {        dp.cArgs                                         = 3;
- I/ c+ J0 t# b/ H  [        dp.rgdispidNamedArgs                 = NULL;
* W+ I2 H2 q2 ?5 f# f, t% j9 i        dp.cNamedArgs                                 = 0;

9 Y, H1 u: X5 `  m) V% _: u//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
" o7 ]/ a8 N# N% d# U1 Z: ^' P                pokeID,
* m+ ^6 ~0 Q( z; g8 {                IID_NULL,
% v6 e! U+ x9 z" e9 V$ O  q                LOCALE_SYSTEM_DEFAULT,
& }/ n- l4 Q$ E/ r* V) L                DISPATCH_METHOD,
5 C9 ~* h! L2 o" r: D4 H                &dp,
                NULL,
- ^4 e0 ^1 ~' I: r/ X$ x* z' I                &ei,
                &uiErr);

        SysFreeString(topicStr);
6 p7 z6 }& H: _% S        SysFreeString(itemStr);
        SysFreeString(valueStr);

8 x1 S: y2 o( I: ^$ Q% K现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

$ Z6 y* A) l. r% S0 C) }
2.这是request的程序
7 A+ R3 k0 [( A3 n& L' }//  Request a value from Extend
9 [8 d  E8 M4 k; H; o8 s//
% t9 d, L" `' ]3 p' f. E5 h0 E6 P//        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
: |1 x+ F( A( x- d: W4 X; C//        BSTR into the variant structure.

' q! z: m; u" c        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
1 O" X& x4 _" V4 V4 ]       
) V1 g* a" N+ X         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
0 s. ^% q! ], O7 @! M. a7 x        VariantInit(&requestVariant[0]);
& d$ ]5 O- S7 h2 z: O  O/ T- K        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
" N. i  s% B; ^/ {2 z8 a# A
' ]) m: Y# _" u' P0 S" p) k          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
* p( z6 o8 h! S" O" [        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
; O+ w; I4 ^- a( m
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
0 [% v2 R% _" H3 U* L. J4 G        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
  ~! I& Q5 k) O
1 U- Z" U% J  |+ R4 E& O% `, q         var.vt = VT_EMPTY;
- z' h. K: E0 `: ~& s
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
) t, W+ ]7 d6 L% @5 ?' O* D- X% j                &dp2,
6 q1 J- d& C8 }3 G6 i+ E+ J( L                &var,
8 @# P" v1 V! }- _! a* ?" J& q                &ei,
: Z; k. m. ]' }! O9 z                &uiErr);
+ g! G# t5 T, m( `7 G
        SysFreeString(topicStr);
        SysFreeString(itemStr);
; l$ J( @( S  g0 J请问该程序是获得extend里面的哪个值？
# P0 \8 U1 }! H9 L0 c5 I如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？