c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
Name = (WCHAR *) L"Poke";
! B* `4 S  N; Y3 u2 Q) Z                
' d' t1 `+ Z* y2 `0 [% H# l        hr = m_pDisp->GetIDsOfNames (
- ^( K5 J2 X4 g# Q4 L/ l                IID_NULL,                                // reserved
* ~4 N9 Y+ n: E( m; p, i                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
                LOCALE_SYSTEM_DEFAULT,        // System locale
2 Y* f' b1 @8 u( r) u                &pokeID);                                // Array of IDs to fill on output
- |/ P/ y1 G0 {9 `# f                       
        if (hr)
1 A; {$ \: h9 h2 k# d$ H- m                {
5 z/ ]7 c6 f, m0 P# n                MessageBox ("Get Poke Unsuccessful");
                return;
                }

/**************************传递数据给extend**************************************/
" q4 S( L" O+ T9 B( z        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
" o" C# j6 ~/ }4 q$ w" B' A; {       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
* e, G2 w8 H* G! @" p+ O. I; A
        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
8 h* Y* p4 k% Q# M3 Z9 ]/ o        VariantInit(&pokeVariant[1]);
2 y  g5 r5 K: S4 B: K' f8 h5 ~        pokeVariant[1].vt                 = VT_BSTR;
        pokeVariant[1].bstrVal         = itemStr;
/ x' m3 I9 n, w
          topicStr                                 = SysAllocString((WCHAR *) L"system");
% R3 n9 n* p% [  u6 m$ L        VariantInit(&pokeVariant[2]);
' H  E- U1 j3 J3 E        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
& Q( C4 j# V3 ~3 E4 Z
- C* s: ?9 z! ]//        Set the DISPPARAMS structure that holds the variant.
( ^/ j' b6 e. y6 P# j5 b
        dp.rgvarg                                         = pokeVariant;
        dp.cArgs                                         = 3;
        dp.rgdispidNamedArgs                 = NULL;
  h$ y% b% `) F% [" }! P        dp.cNamedArgs                                 = 0;
# d& z. |, p3 k8 n* D2 B$ q
5 c) A8 F  b: @  s//        Call IDispatch::Invoke()
, Z2 C- Q2 ~1 A8 x2 o/ v# P+ ?
        hr = m_pDisp->Invoke(
2 N# L3 I: h" b& f                pokeID,
7 U0 }' G# W( {9 B: u2 n                IID_NULL,
& ?" s2 X- Z! d: P$ q' ^, T                LOCALE_SYSTEM_DEFAULT,
' ~) R, y' [! M9 T/ b                DISPATCH_METHOD,
0 v7 ]/ x3 R$ T* |                &dp,
5 w# c7 j% v$ X                NULL,
( t/ Q! H9 x3 _- W3 u, s0 [                &ei,
                &uiErr);
4 q* s6 e* i4 y8 G0 i/ \% ^& z
        SysFreeString(topicStr);
+ b. S! D: t" U9 u1 F- u" a        SysFreeString(itemStr);
+ ~! Y4 Z- `0 f        SysFreeString(valueStr);
; X' l$ t' t, I) g; b
, K7 J1 k/ E  e现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
3 S. y/ \3 Y2 Y4 y4 v
$ r* U, f" w% G) m3 J4 m2 l
2.这是request的程序
+ \: t) V# Y. P) J% K2 O//  Request a value from Extend
//
% z- ]1 ^) R* M$ s5 |8 \% ~$ @  k- {//        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
  ?; N; s  q; o, o. k3 O2 ?. q2 o) [//        BSTR into the variant structure.
5 N1 n9 p3 a4 H# {+ Q
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
: j+ c8 k& y- d/ I7 s0 G3 F8 W3 _       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&requestVariant[0]);
7 H7 F/ n! u) I( S9 ]        requestVariant[0].vt                 = VT_BSTR;
, r7 @. a3 r- l$ G6 G5 d        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
        requestVariant[1].bstrVal         = topicStr;
. L$ ?, t) E( S% q% l
//        Set the DISPPARAMS structure that holds the variant.

: W$ r) x; R/ {5 F9 G" @        dp2.rgvarg                                         = requestVariant;
$ N) n# Q! c9 M! U" W        dp2.cArgs                                         = 2;
% L% o* m5 E* s0 U/ ~$ d        dp2.rgdispidNamedArgs                 = NULL;
0 e6 G! o$ L1 B- C3 H/ m        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;
/ B0 u; i# t& ?( C: `6 \/ l3 x
//        Call IDispatch::Invoke()

4 }4 {' m4 n6 b& B* q        hr = m_pDisp->Invoke(
) E3 k  `8 L4 V6 R8 w                requestID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
( L$ t, T/ g2 Y$ K                &dp2,
                &var,
                &ei,
: E2 Y( ]) Y9 W% S0 z4 T                &uiErr);

        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
1 s6 Q" m" c* G: [! b7 W2 A; A如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？