c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
8 |6 y8 z) r) B* I$ C                
: Y% T) h& N% G; A        hr = m_pDisp->GetIDsOfNames (
# [  H5 b0 Z- J6 Q                IID_NULL,                                // reserved
  C/ J; c7 I$ O' ^: M! ~6 m                &Name,                                        // Array of names to get IDs for
0 d/ v6 }/ D& Q6 M                1,                                        // # of names in the array
  N9 c& z$ T4 _! g! e  [                LOCALE_SYSTEM_DEFAULT,        // System locale
! u3 J* q! {- u4 @/ H: S( F" q                &pokeID);                                // Array of IDs to fill on output
7 q, V, y" _, {- ^4 v$ f$ v                       
$ F+ |, V0 |3 B$ s$ {# M        if (hr)
1 }. ]8 A- W" e( h+ v                {
$ M0 P: N) C& X+ d" f- u, U                MessageBox ("Get Poke Unsuccessful");
3 R% \( D; o% u3 b0 e8 m                return;
                }
6 Y2 y3 t0 t3 S, H/ W
, P" a2 X) [$ g9 \8 A: e/**************************传递数据给extend**************************************/
. |( R( N# c# w7 b1 a        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
5 R4 ?& ~( s/ x8 J       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
4 a  D6 X$ I' x+ u) Q. R8 w5 I% P        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
! |2 l6 p: [" K
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
7 X' x" C, J' z. P' H        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
! F( Q6 {$ `3 I1 T' R+ s4 S        pokeVariant[2].vt                 = VT_BSTR;
# p9 O8 l8 ?  b: M7 b2 I4 Q% G0 E        pokeVariant[2].bstrVal         = topicStr;
! E5 S% W9 H7 b8 u
3 x! a, T8 h% [4 p% R//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
. t+ W7 ]% N( e: H* z# m        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
3 |7 n, Z1 H! [, _        dp.cNamedArgs                                 = 0;
5 c. c8 a* l; C% R( R
//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
! t$ m. B- S  P                LOCALE_SYSTEM_DEFAULT,
7 `( k( M" d) @2 q& D# G                DISPATCH_METHOD,
" f; @9 J2 T4 ?2 N8 Z2 n                &dp,
                NULL,
% Q- G# }' w* c' n                &ei,
                &uiErr);
$ T& \3 J  @1 g( `( E
        SysFreeString(topicStr);
  T2 x: K! Z2 \$ V; P3 w        SysFreeString(itemStr);
        SysFreeString(valueStr);
0 L0 N2 h& n. Y* M& B5 v) j. O
  Q  V; J/ {( }  T' V. h1 X# [现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
" K9 Y4 w  @1 _! {- X: `此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
  Q" O. G1 _' c& W! y3 N1 ^
+ R8 F2 K( A5 X9 Q
& C- H) k$ x' ~, U& L+ S7 M2.这是request的程序
4 j7 c) E! r: \' u9 @+ I4 U//  Request a value from Extend
//
+ J/ w0 d( U+ L$ {! z9 ]//        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 P9 w# N# \* M( o//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
+ B* e  b/ s" @         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
( I8 i6 r. Q* w0 B/ y, `6 b1 s* I        VariantInit(&requestVariant[0]);
5 k- q: a# y% Z1 _/ {6 ?        requestVariant[0].vt                 = VT_BSTR;
# ^) `/ A- g9 ]! \/ T+ C        requestVariant[0].bstrVal         = itemStr;

6 k* F( v# X0 ]          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
! _0 ?$ }: Q- U! l. ~& @        requestVariant[1].vt                 = VT_BSTR;
! s& k1 F, o" @- T        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

0 C( O$ _* A# z8 Y2 Y" B2 t% i' h        dp2.rgvarg                                         = requestVariant;
* c' _4 Y2 n0 Q) `# i+ {        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
9 `  N/ n8 U  H' M        dp2.cNamedArgs                                 = 0;

# C! B  O, V8 A# c( D         var.vt = VT_EMPTY;
- L/ f2 D* c8 }! C# m3 K
//        Call IDispatch::Invoke()
' ]' A  i# k% @! T( [
        hr = m_pDisp->Invoke(
" k' B3 D% h" o) x" z                requestID,
                IID_NULL,
6 I0 y7 C. I& w+ R* @. ]                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
+ n! G0 X  L0 z7 k                &dp2,
. a' `& L/ `; _1 t. F# n/ `                &var,
                &ei,
% a: w# f# d9 Y4 `' Z5 J# `                &uiErr);
2 ~6 ?+ k1 [( f3 G1 [# S
1 s9 I7 F3 v! C        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
/ D0 E4 x; m& a) b2 ~9 i如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？