c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
! l9 x" x6 r' n" {: }. \' @Name = (WCHAR *) L"Poke";
                
2 b  `- U: s; V1 A- h. d        hr = m_pDisp->GetIDsOfNames (
, ]2 t  Y. x) l; B                IID_NULL,                                // reserved
% m) X7 e1 F7 X4 c                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
4 n  Y* Z9 L9 G2 v4 b. [                       
5 {; V: `9 d, z, s' n; ~        if (hr)
+ Q# O# Y8 {0 P" q                {
1 j; a: X/ [/ T                MessageBox ("Get Poke Unsuccessful");
* e- H& Z0 s& y                return;
                }
$ X0 W  l! b* Q3 ?
% p( G1 ^. |/ z/ E. d1 L4 h/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
% ]* e' ~$ z$ Q5 i       
( ]7 ~) A9 J4 P. X+ G8 V% n. T         valueStr                                 = SysAllocString((WCHAR *) L"1232");
/ `$ A  c$ E& ?- c& B8 z        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
$ ]$ b4 S2 R6 R        pokeVariant[0].bstrVal         = valueStr;

" G4 i" h: \9 T  B         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
4 _* z  `( X; y; d& A3 [- q        VariantInit(&pokeVariant[1]);
) P) |2 k$ t  ~( }' t) j  f        pokeVariant[1].vt                 = VT_BSTR;
# o1 y  g9 z7 |2 C$ f        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
* `* T) d$ g. y2 h        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
) u( _+ ~# V' f* n* N/ ?
! Q1 L# k9 r# l: ?//        Set the DISPPARAMS structure that holds the variant.

; T; S$ ]% G% i  @( X+ n        dp.rgvarg                                         = pokeVariant;
6 |% Z+ c" W0 A$ k- Q" U" w. s        dp.cArgs                                         = 3;
$ T9 j! o( x: v# Y4 Z" D- C) i4 b. @, H        dp.rgdispidNamedArgs                 = NULL;
8 Y5 S0 K5 {. B' n3 s; |& G9 A! E        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

; O0 L6 ]8 m: U3 q6 p5 [        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
/ G5 x! [  R, e. l4 \7 N% r% @0 ^                LOCALE_SYSTEM_DEFAULT,
* l  {# @8 G! l$ j# s                DISPATCH_METHOD,
) l1 A) V* [+ B1 g                &dp,
- r  V" K; J) C5 l: X                NULL,
5 R" I6 G/ X# N0 w5 L# ~; n4 r) N                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
1 T* e; ~. W5 r+ K$ b/ V        SysFreeString(valueStr);

现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
* E6 @5 W+ _: }0 h) M5 Q* l) H3 N此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

, e& Q" l9 I) z( D+ [
7 |* W( w* [* D3 W: @& M) y2.这是request的程序
! A" n& ^' S' _. L8 w, G; i. X- P//  Request a value from Extend
. v! u6 S- }; a; K3 n//
3 x! g3 z& h! e9 }/ ^$ Q+ H//        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
+ D7 K2 J# p4 a( q//        BSTR into the variant structure.

; h7 }/ C1 u0 {! h' F: d* d1 ~" h        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
5 O- B) D; o" {( K9 R# D       
* i3 M4 s( {6 N" u  v$ Y         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
* r9 o. e; \  }% [/ @* _) r        VariantInit(&requestVariant[0]);
, a* o" Q* b. [$ V5 g        requestVariant[0].vt                 = VT_BSTR;
) Y! A/ F8 q- o" r5 r+ ^        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
  S7 |4 b  u$ L$ s6 S) z. L2 p        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
/ {% d, c- v) n, J
//        Set the DISPPARAMS structure that holds the variant.
& v) f6 h5 C) E* e8 q. S
8 l/ ?/ O3 Q: q( P6 V% C* W        dp2.rgvarg                                         = requestVariant;
; i/ y) ]5 w: q" ]: p6 E' ^& i# R+ @        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
$ G9 e6 I3 F- ]- L        dp2.cNamedArgs                                 = 0;
! `0 |' i! ]% G3 y
7 G" W/ Z) s, s( @         var.vt = VT_EMPTY;
" \8 K2 y: K: t( d
//        Call IDispatch::Invoke()
& b, \7 |' }8 W
        hr = m_pDisp->Invoke(
                requestID,
. Z6 {# A% e2 n                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
' r9 R( i5 S: V1 E                &dp2,
                &var,
7 ]7 `4 a& M3 f" s' V. {& r2 `                &ei,
                &uiErr);

" ?/ J; T3 w: \1 }% g        SysFreeString(topicStr);
        SysFreeString(itemStr);
7 C1 ^( {1 r* V1 d1 x; ]请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？