c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
/ Z" C1 |* Z( U2 y% l& ~' L: _Name = (WCHAR *) L"Poke";
                
: H5 B7 E/ C9 e        hr = m_pDisp->GetIDsOfNames (
; h, t0 e/ q( Q( ~3 h% @- a                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
+ h0 [  w& f/ o" g& h7 f                1,                                        // # of names in the array
* }% H* {9 N4 ?' {4 U" m                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
+ N. v4 Z* V3 G: _$ s5 ^. n) f+ I        if (hr)
                {
9 v: Y& n8 ~6 P' W2 j4 U7 I8 n                MessageBox ("Get Poke Unsuccessful");
; c: J. D7 |0 b7 t                return;
. i0 Y( I: _5 u6 ]                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
8 L8 C/ S! a( [! ^       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
' A7 i  N" H+ n3 J# g3 |        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
$ N- v+ P9 @* d2 l6 b* l+ a5 D5 l; Y8 p        VariantInit(&pokeVariant[1]);
. G9 e* r3 R, E: n" T7 W        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
8 ^6 |. P, H/ g& X% b2 {5 v" O
          topicStr                                 = SysAllocString((WCHAR *) L"system");
, b3 F( q* [6 F2 ]% t- n        VariantInit(&pokeVariant[2]);
6 t# {' w# s4 C+ G1 |, D8 J' L$ N        pokeVariant[2].vt                 = VT_BSTR;
& b. _8 m6 ~4 g, X8 ]        pokeVariant[2].bstrVal         = topicStr;
  K- G* a& V2 y: _$ y
" ~2 [+ _0 k9 X//        Set the DISPPARAMS structure that holds the variant.
( N/ D- n  l- p0 `3 J( S
        dp.rgvarg                                         = pokeVariant;
' ]7 Z% {0 {- Z0 T9 x0 l  y& w        dp.cArgs                                         = 3;
4 P1 ?9 u3 C% w6 {        dp.rgdispidNamedArgs                 = NULL;
# d- c, N; w; a, n& R6 I        dp.cNamedArgs                                 = 0;
+ _: \: j3 u, ~( U* e' h; f% D4 `
//        Call IDispatch::Invoke()
8 O- _% F6 n7 _/ ~7 ~
$ b" v: e; |5 ]) i5 Y6 {        hr = m_pDisp->Invoke(
/ g! v, u9 I% s8 h! w' t" k                pokeID,
/ Y5 m6 |' ~, y+ s5 w7 M: H% e                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
8 d' R1 q4 |4 R* N' U( l                &dp,
% P; p7 T7 h: I- P) {  x* a+ J! {  i                NULL,
& C1 A5 z0 n8 z                &ei,
) M2 T7 ?7 i% f; `6 t                &uiErr);
) z8 K9 u0 Q- `; I- ]$ [
        SysFreeString(topicStr);
, p. D8 v7 X9 T5 V        SysFreeString(itemStr);
& {' l6 U0 s' K/ [5 Q6 J1 H% S        SysFreeString(valueStr);
8 d/ h8 P' v* h
9 x+ v  A2 Q3 c  P+ e" i5 v现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
# P0 ]3 s4 O! m5 s此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
' U  k* S% O. z

2.这是request的程序
$ E" o( }( \. y) f! }  u//  Request a value from Extend
; Z' e/ t7 ^* c0 y- r1 a//
//        Initialize the variant that will hold the BSTR.  Set the variant's
5 }& T; I# A/ r/ N& W* Y" p0 H//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
1 z0 c1 j% m" }9 E        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
% z8 G; P1 S6 U  d: e+ M        requestVariant[0].bstrVal         = itemStr;
) O5 S1 _4 L& H9 \
0 `% U& f! `8 J, L8 t! x/ k          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
% e- F6 K  S5 S
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
6 J" ?; T. q, }  d1 e& D# j
( _# P, r* S1 H; B! b//        Call IDispatch::Invoke()
4 a- @' V0 G4 r5 E* @. n  O9 [
' a) j! Q' F' G5 _6 L1 U5 n" _/ i        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
6 {2 N! _' G  @2 h9 Y                DISPATCH_METHOD,
                &dp2,
# e3 ?. K# {2 a/ J                &var,
                &ei,
                &uiErr);
( Q4 w$ [/ F- h2 R
: F: @% P' a# r6 U. ?+ |        SysFreeString(topicStr);
- w+ M  h7 ?8 G0 d        SysFreeString(itemStr);
; j* z% |0 a  B( c请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？