c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
: x& f* ], a) O% G: b- ~6 J5 \) i; _/ Y                
        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
; |4 m% m, M6 V3 I9 V4 b% K                &Name,                                        // Array of names to get IDs for
6 |2 y* x% \( B' r/ G                1,                                        // # of names in the array
4 D6 \2 j& x% w% \                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
                       
        if (hr)
' E7 D, i+ r% d5 e                {
8 h. k8 s; }0 R9 A+ G7 ?  X                MessageBox ("Get Poke Unsuccessful");
4 O& l" ?# J3 b: U$ S! z1 m                return;
                }

/**************************传递数据给extend**************************************/
        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
! T" k  B& y/ |7 X+ T/ p       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
% O+ m) S1 \+ z$ y: W3 y* _        VariantInit(&pokeVariant[0]);
) O+ \4 N5 d6 c8 b' f" w% h* I9 M        pokeVariant[0].vt                 = VT_BSTR;
: d6 t$ T! t; X* c$ W* A! E/ [- G        pokeVariant[0].bstrVal         = valueStr;
7 K6 |) m/ k% c+ ]3 g% g( i" `
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
$ }; R; j' H/ q7 _' M' x        pokeVariant[1].vt                 = VT_BSTR;
( G% |- l3 h8 A        pokeVariant[1].bstrVal         = itemStr;
3 [- j4 W  H. Z6 y! ^& q! \$ R
1 ^- E( b6 t' V3 d6 k: C9 J1 Z4 D7 L' ~          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
        pokeVariant[2].vt                 = VT_BSTR;
4 Q4 j" k! d1 {( U/ o% W) u        pokeVariant[2].bstrVal         = topicStr;

7 S7 ~" m% A) t1 k" Z4 X//        Set the DISPPARAMS structure that holds the variant.
1 B: |, S& W& R2 u/ X
        dp.rgvarg                                         = pokeVariant;
! X& ?$ M( |+ Y+ g        dp.cArgs                                         = 3;
+ a1 A- a% h3 }! l        dp.rgdispidNamedArgs                 = NULL;
        dp.cNamedArgs                                 = 0;
* x% m! y3 w) W5 i6 `
4 Q/ @% u6 B$ ], K# h0 G1 Z1 b//        Call IDispatch::Invoke()
9 O+ j/ S! N. @+ c2 ?
" i( `' Q0 A: i8 J" V0 K2 b  \        hr = m_pDisp->Invoke(
3 L& U3 b0 J) _+ [                pokeID,
                IID_NULL,
# ], e5 w+ K. V( p7 g& W                LOCALE_SYSTEM_DEFAULT,
& j  q8 u. f  W8 |0 A& p8 X4 F% p7 u                DISPATCH_METHOD,
                &dp,
# p5 e# b# p* L1 {; S# n                NULL,
* u, t: A! y+ e# J                &ei,
                &uiErr);
* @7 V- W8 B2 [( Z
) m* ^' F, B" \' O. ~# v        SysFreeString(topicStr);
$ @$ L: }" N" p        SysFreeString(itemStr);
& R+ _) S8 o% s) ~        SysFreeString(valueStr);
* |" J2 e1 C2 J, X
* @' D; q" W5 V' f5 W! X5 m现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
. h0 ?7 R- Q. d* }+ Z3 b5 ^' l//  Request a value from Extend
4 L" W7 E+ I! W; x  ~" P" z//
//        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
% O( A9 l, v& `* f& ^//        BSTR into the variant structure.

4 P8 S  K5 _" I! e/ m        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
) r1 Z  b8 }/ w7 x2 U. n' ]        VariantInit(&requestVariant[0]);
4 m( `( k- Z8 a3 h+ z% F        requestVariant[0].vt                 = VT_BSTR;
' q- N7 R( ]* }* d        requestVariant[0].bstrVal         = itemStr;

8 b1 s1 p  B& C0 l' \  v. u) X6 [. p          topicStr                                         = SysAllocString((WCHAR *) L"system");
; S, e( C- \2 L& K% b! Y% N- S        VariantInit(&requestVariant[1]);
' A- ~' i; @( I1 o) t# Y1 |: b        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;

9 x) r/ g# p% d! q//        Set the DISPPARAMS structure that holds the variant.
4 m' x9 @% R6 [7 N9 x8 G
& l, a& f6 [; q! w- c        dp2.rgvarg                                         = requestVariant;
/ p0 Y+ F" L" b' z$ M1 S! h        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;

3 o3 A; [  q1 y# m* N6 K3 N         var.vt = VT_EMPTY;
/ Q- I; s% ?4 _- `* I, W
( C1 C. V4 g' x) u# y" O//        Call IDispatch::Invoke()

        hr = m_pDisp->Invoke(
/ _: z9 v, x5 {  e2 _                requestID,
                IID_NULL,
6 m8 s! ?. h) l0 D/ S& G                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
6 {- M) ^  v* E* O3 L5 A: ~                &dp2,
9 q3 B- P8 T: g* j& Z                &var,
- j% Q! V  K+ {$ W, b3 [3 c                &ei,
% d; K6 F$ q& J  Z0 v: n# i                &uiErr);
+ A9 c$ G' H/ S8 `
5 T1 {( a0 P0 J* N: u8 _* o        SysFreeString(topicStr);
2 }, m" L( k7 ~6 |        SysFreeString(itemStr);
5 C9 Z, n2 U" O请问该程序是获得extend里面的哪个值？
如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？