c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
$ Y1 \6 G1 P! e2 _1 `0 AName = (WCHAR *) L"Poke";
                
. C" @; d, |* J+ |' s        hr = m_pDisp->GetIDsOfNames (
+ g9 S, C3 ?* }4 A& s                IID_NULL,                                // reserved
; O0 w4 p) D/ f, w# ]                &Name,                                        // Array of names to get IDs for
' U. O& E8 u7 t' s. d                1,                                        // # of names in the array
$ p8 Q- H/ i8 \' z4 b                LOCALE_SYSTEM_DEFAULT,        // System locale
3 D: V2 C, h7 [! j+ k                &pokeID);                                // Array of IDs to fill on output
- i- h: P3 F! ?/ x' K9 u5 g8 f+ b' c                       
0 a5 k1 k2 q1 ~% m( q/ ~        if (hr)
& L" r/ K2 V( {& p% A# {+ S                {
$ V: @+ |$ E& ]5 m                MessageBox ("Get Poke Unsuccessful");
0 e7 i/ I5 Z/ E5 `# i% H* T; J5 m                return;
/ ~: C, s# u! [$ q; x( [6 @+ s5 F                }
' x( H9 J( T  K! J9 k" I5 k
5 ]- M5 i3 F# @- `! E/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
( o7 K5 q/ j$ u/ `5 `6 j6 y        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

4 o5 p1 G7 _1 ~- _: z* y         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
2 _+ ^! d* v0 p5 Q2 q; b        pokeVariant[1].vt                 = VT_BSTR;
; v0 v. o* |, z( m: ?% [5 n' e8 ^        pokeVariant[1].bstrVal         = itemStr;
* R& F5 Q6 K9 O8 i5 A+ T0 y! b
) s' ~/ y* l$ V8 R  D4 K% n          topicStr                                 = SysAllocString((WCHAR *) L"system");
3 ^5 I, a& W+ j        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
( h6 `  T) @  X: W        pokeVariant[2].bstrVal         = topicStr;
7 r  `, [. }/ Q$ B& h8 J# M
, V& Q1 w; I" o1 B, x& r//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
  C: H" ^, Z* m; c0 M0 {  E5 r        dp.cArgs                                         = 3;
% g+ P5 }0 ?1 Q1 {$ [# O        dp.rgdispidNamedArgs                 = NULL;
1 p5 N4 w' B  n2 N/ G        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
* w' _/ C8 z4 M+ ^# p1 N9 [) O
, w) r0 q, g+ [2 T* {        hr = m_pDisp->Invoke(
* s' G3 w# R2 c' q" L: Z8 j) C                pokeID,
                IID_NULL,
5 J% y0 d& W9 J* \. _* h1 V                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
/ t+ {! }$ ~: C  b4 y+ Y6 j4 u7 @                &dp,
                NULL,
  l8 [. K! M- w" C0 E2 S' V                &ei,
                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
- Z. g. h5 P. m        SysFreeString(valueStr);
$ K6 D/ n# B) b6 V
: Y9 r6 C2 I( J, ?  P3 z1 V现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
" `2 o; V4 I) Q此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
- ~9 l$ S8 f2 q7 x; h/ i0 \, V

: D' J% T: ~+ d2.这是request的程序
//  Request a value from Extend
) h* j/ W2 G0 J//
: f/ `' L2 T; e3 T2 i//        Initialize the variant that will hold the BSTR.  Set the variant's
4 a* W: y" v( X2 n2 P8 D4 D//        type flag to indicate the fact that this variant holds a BSTR. Place the
//        BSTR into the variant structure.
# b, z; _+ x3 c  B9 D5 Y
* u9 s* A' n9 O4 u: V+ N$ E: L9 v        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
; t) n! G, s, D* ]       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
  I& L9 s% V% I( a" ?$ U        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
9 J/ |- N& o8 G/ O        requestVariant[0].bstrVal         = itemStr;

' f0 Q# g% x) U) s  e( Z) Y2 ?          topicStr                                         = SysAllocString((WCHAR *) L"system");
# S* Y0 c! E2 Y) X6 N) G        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
8 {1 Y. j0 k* F' O
//        Set the DISPPARAMS structure that holds the variant.

" J! G7 c. w2 z        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
) ~& B) x1 w' J+ c! S        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
5 [( u4 I6 P; ^  n3 b& A
        var.vt = VT_EMPTY;

; ^: N( i" \/ Z! z& H$ B/ M# Y//        Call IDispatch::Invoke()
3 }& E$ k& ^- C, g5 ~
$ ^6 j1 R( F% ?% M$ u        hr = m_pDisp->Invoke(
8 x9 U/ U' G1 R+ e4 F2 @                requestID,
$ F4 L, N4 q# {* ?4 u* Y                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
( s# a0 V7 ?7 h+ @! p$ j& r. ^: }                &dp2,
* O7 Z' k8 T3 h# q3 o. K                &var,
                &ei,
4 m3 L; ?2 ^& H' y2 H0 a                &uiErr);
/ G2 v$ @6 e4 F  P7 I7 I
5 ~! G8 S/ F& N- N  c        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？