c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
  Q- J  A0 {% G  qName = (WCHAR *) L"Poke";
8 K8 D! e' d/ l# _( a1 K; X                
5 k# `8 \$ l3 D        hr = m_pDisp->GetIDsOfNames (
4 G9 G4 b/ u$ v& @# W& r                IID_NULL,                                // reserved
                &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
/ A0 c3 d3 H9 @( ]$ w                       
' o8 B( u0 d# {2 Y. Q        if (hr)
1 @' f, U* K  s# ]5 l                {
' o9 r  s+ A! A                MessageBox ("Get Poke Unsuccessful");
                return;
8 U# P' o8 Z5 n8 y9 f' H6 |                }
. a' Z% B7 n* i. B8 }
/**************************传递数据给extend**************************************/
) [! g# Y# m6 D! i        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
+ {2 t# P4 V$ g% j6 E& u  z$ z! N       
+ d' O0 x1 W+ F' ~         valueStr                                 = SysAllocString((WCHAR *) L"1232");
0 S& w! a: v# Y        VariantInit(&pokeVariant[0]);
5 A2 U! Z7 g0 F7 F; i1 O/ @        pokeVariant[0].vt                 = VT_BSTR;
" J7 |" }; E$ o$ X% C        pokeVariant[0].bstrVal         = valueStr;
% b$ X8 x  d' |- ?# `0 x, S! ^/ F
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
7 F$ b/ B0 @  c: p/ Y        VariantInit(&pokeVariant[1]);
: J9 Y+ O" n9 x; Z% I$ K        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;

7 b6 d% j3 M9 k  S3 a+ j5 H          topicStr                                 = SysAllocString((WCHAR *) L"system");
; k# U0 h+ g" O        VariantInit(&pokeVariant[2]);
4 U7 E. P7 g% E        pokeVariant[2].vt                 = VT_BSTR;
. e# a- R  n, ?* W        pokeVariant[2].bstrVal         = topicStr;
  c" W8 S( J, C& s8 Z6 l
//        Set the DISPPARAMS structure that holds the variant.

1 U% g" r! p1 X8 I$ D* B# A        dp.rgvarg                                         = pokeVariant;
( x7 C+ W7 R$ M1 w, V0 P% ^' Q        dp.cArgs                                         = 3;
5 K/ e$ r* W2 G# \        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
3 [: V5 G6 h! o# E6 w, @) X7 |
- D, L$ E( ?0 q6 \' d4 d//        Call IDispatch::Invoke()

9 I2 |# v. ?: G* M, S1 ^8 A        hr = m_pDisp->Invoke(
                pokeID,
9 P/ O  a  m/ r( u                IID_NULL,
8 o& n* n) x" p( y                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
7 N; X+ a+ _2 p% e                &dp,
3 F( D- n7 O) b8 j+ ~6 P                NULL,
                &ei,
                &uiErr);
" `1 T- w$ I1 o8 l0 `
* |/ G0 E, N; X2 w! g- _; S4 c        SysFreeString(topicStr);
        SysFreeString(itemStr);
        SysFreeString(valueStr);

( P% q# G) t- J) n/ O现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
% d* \6 U) C; M; s) v此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
  ?/ T& K3 p- q
7 Y1 _! E4 G0 D/ h
2.这是request的程序
//  Request a value from Extend
0 T; _& m. ]4 e* {5 h//
//        Initialize the variant that will hold the BSTR.  Set the variant's
- {3 W& G5 u# n; k, ^//        type flag to indicate the fact that this variant holds a BSTR. Place the
, m6 r: a) i5 }//        BSTR into the variant structure.

4 @, q6 u  E4 t4 A, C& l7 f* A" @        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
7 K' Q7 A1 x% v6 ^$ E" [       
4 H) ~& |1 ]+ q         itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
+ ?5 T$ j" s2 F" }8 B& K$ |5 I        VariantInit(&requestVariant[0]);
5 S' E8 O6 [) u; O# ~        requestVariant[0].vt                 = VT_BSTR;
8 P4 k# q9 x3 G/ B* h9 T; ~        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
1 l/ w- E7 f+ O' p        requestVariant[1].vt                 = VT_BSTR;
% z/ N6 M2 l6 d1 T        requestVariant[1].bstrVal         = topicStr;
$ j4 {! U9 [' u8 ~0 Y2 B$ {
//        Set the DISPPARAMS structure that holds the variant.

        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
9 a$ I+ x- t# [0 D! F        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

7 U0 K) l! K1 w7 R0 O# @//        Call IDispatch::Invoke()
1 i3 J% t7 E$ X8 Q3 u* v0 X4 @/ J
        hr = m_pDisp->Invoke(
9 U4 w* M+ Q* `                requestID,
* J5 t9 Z9 ^- C8 |! o, e                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
% ?5 O2 ]: p! t! s# S7 z                DISPATCH_METHOD,
9 L) X# o& e- c+ t% J3 X                &dp2,
8 x- c" J: ~; }% v/ a  W: x0 Z$ s7 u" H                &var,
                &ei,
! F) n8 q$ g2 F6 F                &uiErr);

0 f; U+ m* @- j" d! M        SysFreeString(topicStr);
        SysFreeString(itemStr);
9 c6 x# T9 Z3 S请问该程序是获得extend里面的哪个值？
; k$ h  c* I4 T" @0 n如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？