c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
% c, G7 Q9 j8 vName = (WCHAR *) L"Poke";
7 t' m+ q7 v7 J# ]+ p: u                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
( d, B0 i/ L5 D6 K8 j                1,                                        // # of names in the array
# j1 Z* j* ]4 x. B0 P: c                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
  S5 Q# G+ u, i                }

/**************************传递数据给extend**************************************/
0 m* j6 w( Q# w6 [( \0 {3 ^        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
# @/ V9 B, j- `9 ^. G8 C       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
' a1 Y* [- S/ f( g, }* K8 V4 W1 V        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
% n5 S7 b. i4 ~! b9 o% p; Y        pokeVariant[0].bstrVal         = valueStr;
4 C7 \9 B! x% S4 k: P+ _
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 X3 b5 S3 H, ^0 G# d        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
( r- R' N: \. Q        pokeVariant[1].bstrVal         = itemStr;

          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
0 a' Z9 w! o" w0 d        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
" T! Y2 \# ~& K" L, s+ j
3 H7 s" A  x! N, Z% l  i//        Set the DISPPARAMS structure that holds the variant.

        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
: X, n: R( `. O; }" }7 T1 |! m& O        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
2 K+ l2 t0 j( Y, K: u, y# K3 y                pokeID,
1 R6 B* h, W9 r  x                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
2 F- ^' S2 b- e# t                &dp,
                NULL,
                &ei,
% W! p+ H" e5 i0 |/ U                &uiErr);

3 a! G. [( y, a- U3 ?  k9 C        SysFreeString(topicStr);
  G/ e7 A- G7 I& `# m& r        SysFreeString(itemStr);
3 z8 C% ~4 {0 V4 f. t  Z+ p        SysFreeString(valueStr);
/ k$ N/ q  l1 Q$ T; p. ]6 ?
- C  W' y3 o4 j, U现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
5 Z, c" F  y5 T# H/ u7 d

2.这是request的程序
//  Request a value from Extend
3 E5 C. F; m0 m- i/ j9 d% I' y# n3 j//
& T# k6 l' l( y+ w; Z2 E4 a% R1 j6 N//        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
0 n. N" @# c) z, `8 p//        BSTR into the variant structure.
* M7 q1 r" v& H( j7 s9 q; Z
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
) {" o0 M; q1 y/ ^4 g5 ~" g       
4 K2 i! n9 @: ^, O/ t         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;
+ T+ m, D  b) y7 E( d
, U! F$ T  a/ z4 B9 f2 r- n          topicStr                                         = SysAllocString((WCHAR *) L"system");
6 P& h6 L. S( i; S9 S        VariantInit(&requestVariant[1]);
4 F- I5 ], B$ w        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

2 r+ ~3 A1 j9 Y, `' z" q//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
8 K2 u, ?$ W: ]/ h6 o6 o5 k) d        dp2.cArgs                                         = 2;
, N0 o; y; A5 Z/ q, o        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
- @- D, O3 b7 Y* H+ ?8 p/ D3 r
        var.vt = VT_EMPTY;

8 P' P" [) }( A- L0 f7 {9 n//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
6 T' y- x/ a3 ?( C; }* d                &dp2,
                &var,
                &ei,
                &uiErr);
5 }" b2 C! Z/ {% K" B; N8 O2 G( j
        SysFreeString(topicStr);
        SysFreeString(itemStr);
! M: ]) Z' e" c- {- p) `请问该程序是获得extend里面的哪个值？
' C9 R: q/ R" S6 u如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？