c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
6 U2 d" t- W+ X0 _Name = (WCHAR *) L"Poke";
                
8 _2 p2 }7 Z6 r( P- g8 _        hr = m_pDisp->GetIDsOfNames (
; R5 Q/ d% g* u' }                IID_NULL,                                // reserved
' N3 `5 Z5 d& l' j                &Name,                                        // Array of names to get IDs for
6 p: g5 u; y7 k7 x. V- ?& b                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
8 Z5 `  }1 o' _- Y! V4 I# ]# y; E        if (hr)
0 O; X; m5 W8 ^) D* \( \4 s                {
) b, x( V& \& F- r                MessageBox ("Get Poke Unsuccessful");
# p3 ?: H0 z! W* c: z4 Z3 n- n                return;
: V' M: ?5 Z: \' N  D  g                }
0 a. N& Z  Y0 e2 R: y8 C' ~
6 J4 g, r. G) j' b+ K/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
3 e2 [: B4 G" W4 M       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
2 ^8 a* t- L2 Z' K, O1 p) E        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
9 w$ U" O. M* ^/ p
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
" N. c- e/ Q' U3 C" x        VariantInit(&pokeVariant[1]);
' B; r5 e( j5 q  h        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

5 M/ A; S& E% S) X( T) j          topicStr                                 = SysAllocString((WCHAR *) L"system");
/ `/ [  a/ H% P        VariantInit(&pokeVariant[2]);
' d+ z# [( @7 |( N$ _' l; C  R! L        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
  Z5 C8 d* p' ?1 ?$ {# X! l
//        Set the DISPPARAMS structure that holds the variant.

' `4 c5 x/ S( w/ F8 y        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
% [9 m3 |& y! o$ J/ }        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
! A& X# q6 n) n. `( _( }
! r& u, A7 i8 `4 c; Z  W: S9 v        hr = m_pDisp->Invoke(
2 g& B4 A2 l3 J7 v. u: e+ U                pokeID,
- G9 }6 N8 }4 a" x# n# x                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
3 k+ C% E' R  P: n                &dp,
                NULL,
5 }( o* S* {. m4 q                &ei,
% m( p/ l; w* x* y8 j                &uiErr);

        SysFreeString(topicStr);
! d: v0 B, J3 T' L! ?; ]0 M" o        SysFreeString(itemStr);
        SysFreeString(valueStr);
$ p7 f. g3 Y5 e" W% `' ~
9 g- `4 J2 B) E) W8 u, {5 k现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
1 T8 e8 S3 [+ `" n" o& z. o此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
3 j9 K# c' _: Z- G

* s& j, w; E6 k; i" V" ~9 Q2.这是request的程序
; M0 i( _) [) _$ f1 Z# ~9 P& m7 F//  Request a value from Extend
$ ]7 U) T, \* K) m) f4 x, x! p2 Z//
1 s: H# V2 |, E. d//        Initialize the variant that will hold the BSTR.  Set the variant's
, c9 L- i6 |2 D2 P! d+ H//        type flag to indicate the fact that this variant holds a BSTR. Place the
+ _4 P+ j- O  Y# g2 y/ r//        BSTR into the variant structure.
/ @8 s! Z9 d/ Y% a) Q6 ?: K0 X5 O
( k0 \; A  Q. }& D8 F; \4 j9 R        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

# Q4 K% R8 w3 ^: u. w7 u, }          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
  P$ C  B" N" t" X3 d; |* `        requestVariant[1].vt                 = VT_BSTR;
8 p; [( C$ U1 X7 n/ c, |& L        requestVariant[1].bstrVal         = topicStr;

# e6 `( `4 Y( f0 C4 \" ?//        Set the DISPPARAMS structure that holds the variant.
, A% E! X$ ^+ w
  u( P. J6 S: J. Y! l8 p. C! q) O        dp2.rgvarg                                         = requestVariant;
7 G  V$ Y+ i3 C, q2 x! `        dp2.cArgs                                         = 2;
! }8 q6 Q% q! h+ u" U+ D: T        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
. U9 {4 x$ U  |8 g7 E
- n% X" F* V) ^( \+ S$ }$ F         var.vt = VT_EMPTY;
4 b, ]5 s7 m" |; H
# s8 u7 s4 h) _8 @( Y, p: ?//        Call IDispatch::Invoke()
5 e4 K/ s% C- Y8 q
5 E1 k0 c: `& t7 b        hr = m_pDisp->Invoke(
# r1 A0 k1 f% {2 l1 A( T                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
% P' z5 m; Z8 D" A) P9 {                DISPATCH_METHOD,
1 S% y) R2 i$ V; E! |1 _$ H                &dp2,
                &var,
                &ei,
$ |- \7 G' [0 ^3 U* Z9 f                &uiErr);

        SysFreeString(topicStr);
" J7 D4 a: u$ u% t  B6 G2 q        SysFreeString(itemStr);
" ^# I/ Z6 `" M1 }请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？