c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
# S. E( Y+ j: e% ?  [* dName = (WCHAR *) L"Poke";
, M: Q' o; V6 c) i( w& d7 j2 w+ ^                
3 R1 \; }& n4 i# x3 u        hr = m_pDisp->GetIDsOfNames (
% b) a6 B: I- G/ U$ \/ Q                IID_NULL,                                // reserved
; s5 ~$ f0 G* `3 v4 T- C                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
- I' S* H3 P  f/ v$ a                LOCALE_SYSTEM_DEFAULT,        // System locale
! \3 G3 ?! X. ^+ q% \+ i                &pokeID);                                // Array of IDs to fill on output
+ W' |* l0 F+ l/ i8 m5 u                       
( p; c' V1 h" n) x        if (hr)
$ E# a) i4 _# \                {
+ s8 p7 I' l$ m% N. [                MessageBox ("Get Poke Unsuccessful");
                return;
: [7 Z2 k" }/ w5 ]1 a$ s                }
# T' c0 A$ J& ~2 h$ I
# u3 c8 Y. K* ^' M/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
, A  i( F! ?) D& V7 `  B. C        VariantInit(&pokeVariant[0]);
4 O8 C  v$ @2 V2 ]        pokeVariant[0].vt                 = VT_BSTR;
, C5 h( ]/ h5 H5 E6 p        pokeVariant[0].bstrVal         = valueStr;
6 o: X# R" c' {! p$ b3 Q! ^' m# G. ?: K
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
, @% }, R# Q! h4 @- P8 D! S, \4 P        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
% s5 R# c- ^, D* ?: Q
8 Z  J( ~! x, i" s' X          topicStr                                 = SysAllocString((WCHAR *) L"system");
9 ^' J8 _4 u( f2 V& }- D; U' y        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
5 |* N  I0 V6 H1 G        pokeVariant[2].bstrVal         = topicStr;
& P  E! I* L) _2 U* n( Q/ ?: Q
//        Set the DISPPARAMS structure that holds the variant.
/ r& u- a( w& {0 J" ^
  }: [+ L8 `0 X9 B# L' I8 R3 h        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
2 L( L3 J$ z7 v, t0 u9 k        dp.rgdispidNamedArgs                 = NULL;
" y% @+ h( N" r; g% ?6 S        dp.cNamedArgs                                 = 0;

' n" z6 @3 C, s; k+ c//        Call IDispatch::Invoke()

  o8 i9 E4 l! n, b% v        hr = m_pDisp->Invoke(
6 B9 {* a7 @6 m. y8 v                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
9 A9 {1 Z% \. y                DISPATCH_METHOD,
                &dp,
7 i4 c4 L7 S' o" A5 ^                NULL,
) K' n) L; u, j3 k% ^                &ei,
9 B: a4 P' I& `- p                &uiErr);

+ B! _: B/ q5 ~3 U! `        SysFreeString(topicStr);
        SysFreeString(itemStr);
$ G8 i2 f! j; q" I/ l        SysFreeString(valueStr);
6 t4 v5 h" T* d9 I
现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


9 y+ M# N( D3 Y3 R8 Y& D2.这是request的程序
6 e7 m& P2 N9 M! o& Z: J* F( d4 i//  Request a value from Extend
: t+ }; R+ f3 }4 b1 J( I- E/ E: y//
$ k" v. H6 C* S8 F. d//        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
4 Q9 M/ L/ i8 `3 Z% h9 O5 E//        BSTR into the variant structure.

        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
; S* f: k# i- }( c  w' |         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
) t/ I, T" ?) `2 W' W/ Q  j. _        VariantInit(&requestVariant[0]);
/ f: \8 m2 l. H& F& i* f5 K+ i' p        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
- K) _% l  v! T: s- I
/ E2 U  m' }/ q, m3 ~1 A          topicStr                                         = SysAllocString((WCHAR *) L"system");
1 T9 q* ?& O: x9 s! ~' v0 S        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
+ R* s# H3 W" R' j+ _        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
, i. d2 M: I  g
  ?( x$ M, ^7 K9 _7 \9 v        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
; ?" q* ^, J9 U* F: S        dp2.cNamedArgs                                 = 0;

5 g: ]2 o. [6 S! I* N         var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
" @' U7 i7 s7 p7 P3 p
        hr = m_pDisp->Invoke(
                requestID,
9 e4 X9 X7 Z' i& g+ g) }- x! C: c                IID_NULL,
$ W5 n  I: A" g$ T- C2 h                LOCALE_SYSTEM_DEFAULT,
9 k, t0 c4 c3 c3 J                DISPATCH_METHOD,
                &dp2,
6 ~% y7 k' Z: j8 L5 i) x' n                &var,
                &ei,
                &uiErr);
) {6 e9 u1 c+ {' c* @- [
7 i$ a4 c" F9 ^- T: T        SysFreeString(topicStr);
        SysFreeString(itemStr);
5 t) B0 b3 S0 X0 Z. u请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？