c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
                
+ N  ]# ~$ ]) w9 v        hr = m_pDisp->GetIDsOfNames (
- m3 K, p' m' {! ~' ]4 E                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
4 z6 U! x! {4 q" q+ D                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
0 \# ^( @- i; y1 P. |( L: o: F        if (hr)
/ O  g, G0 |2 j% }                {
                MessageBox ("Get Poke Unsuccessful");
( ~  K" r5 R, O6 s                return;
4 _, ^: h4 f" ]  W) j                }
# a8 e7 T' r0 W4 U
1 K: q$ l. U. T3 i/ y/**************************传递数据给extend**************************************/
% ]* M$ F* x; h9 |/ j: \& L$ x        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
. e: y$ ^5 j; b% B# h       
9 h0 `" J! E9 J  S: ^6 p         valueStr                                 = SysAllocString((WCHAR *) L"1232");
9 p; v2 [1 w8 \2 z# U. q        VariantInit(&pokeVariant[0]);
& T" W+ M/ M0 w4 x2 H/ z- Z/ N        pokeVariant[0].vt                 = VT_BSTR;
: z4 O# o" _) ]        pokeVariant[0].bstrVal         = valueStr;
: v) r' \% G1 u+ x! I
, E  p& N# z9 s9 `         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
. |3 q" N' p( t: G/ N        pokeVariant[1].bstrVal         = itemStr;
8 |( W4 L6 L3 ^9 ]4 v7 \; I$ P
4 L0 |+ P7 N, V* ?' V1 h. M& d" ~          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
3 o( f+ [9 [- b& s6 V        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
$ R+ |! Y5 z9 Y# i' ?# i
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
$ Z% \/ `& z# x- b3 [        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()
8 k, [9 u1 g- k. O% @8 ?4 }: }
! d/ Z& n9 x1 l        hr = m_pDisp->Invoke(
" n; @* J/ f- \) U+ e% p( H! @                pokeID,
& T+ o4 S  p; r                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
9 @* m( t" T1 b                DISPATCH_METHOD,
' u8 j( |% a8 T, k. j2 S                &dp,
9 M* a  K0 F& r) i8 {                NULL,
                &ei,
) z4 L2 F" h$ Y& x. g- \& c: [                &uiErr);
+ V7 b, L. l" I6 J
        SysFreeString(topicStr);
1 n; I, b% M/ ~( v% p7 B        SysFreeString(itemStr);
        SysFreeString(valueStr);
* J5 C8 [! I- E/ J1 K" W
; i$ z4 ?' |3 P* Y9 F现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
3 _. B1 [$ _9 E1 i7 H2 L& M3 J) H: w4 w此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？

. A2 ?5 {! S, D( k8 D: T5 j( l4 j8 Z
2.这是request的程序
//  Request a value from Extend
' T4 E5 M, a; |$ o8 @$ C//
//        Initialize the variant that will hold the BSTR.  Set the variant's
- N$ O" H0 A& g  w//        type flag to indicate the fact that this variant holds a BSTR. Place the
: v' _; Y% J1 U8 p//        BSTR into the variant structure.
  z4 j, P, U. i
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 ?9 D) b# T. F8 E$ m: E) N        VariantInit(&requestVariant[0]);
3 x& Q$ J. G$ U# h6 f        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
6 p$ ]: Q! g  L' s- R  u5 J
          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
% U3 P/ t( T3 `. N        requestVariant[1].vt                 = VT_BSTR;
! z, P: N0 n" k5 Z9 A5 O  c        requestVariant[1].bstrVal         = topicStr;

- Z( e; Q  O  y. C* D4 t//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
, s8 V$ j% f6 P, E" S$ R        dp2.cNamedArgs                                 = 0;

7 N0 h7 _9 D) h         var.vt = VT_EMPTY;
- z% y. ?4 o6 H. r( K) B
3 g! E5 Q1 n3 ^  U//        Call IDispatch::Invoke()
! w, u  \. U: C
$ x& }9 q! F8 m        hr = m_pDisp->Invoke(
                requestID,
  y" ]% O4 a. Y* ~' H% K+ H                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
  `/ \( e" M* r" t. _3 A/ R" m                DISPATCH_METHOD,
                &dp2,
                &var,
                &ei,
                &uiErr);

( S( W# a7 I, [4 w' Y        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
1 J# x; }6 j5 k; g# M, `9 G如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？