c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
" ~7 B, L" `# n( lName = (WCHAR *) L"Poke";
                
  }# X& K6 b: m3 ]" z1 g        hr = m_pDisp->GetIDsOfNames (
  d4 V8 c0 s, v; p- N                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
1 n& _/ y! N: U                LOCALE_SYSTEM_DEFAULT,        // System locale
- b+ A1 }. a: f% P+ J3 u                &pokeID);                                // Array of IDs to fill on output
' @' w/ ~* u9 C1 O+ y                       
        if (hr)
: Z8 F% A; h% S                {
                MessageBox ("Get Poke Unsuccessful");
3 F5 W  [9 n  D3 w- h                return;
                }

4 T5 r/ e6 t3 C5 D* O2 T7 e/**************************传递数据给extend**************************************/
& y) A' o' ?- W' ?7 [! s! T        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
       
        valueStr                                 = SysAllocString((WCHAR *) L"1232");
% C2 U5 _. j( Z; ^7 ~        VariantInit(&pokeVariant[0]);
  o6 t0 k6 A; \        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;
9 q* o7 c' O9 H5 Z
* }% J! p# ?1 k, S/ K# |         itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
5 o# r6 V+ i, h2 ~        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
; }. ^3 g4 D: l  k3 _4 h# i        pokeVariant[1].bstrVal         = itemStr;
9 {  n4 N& q0 R) L
  z- A2 g% E1 `$ g9 m8 h          topicStr                                 = SysAllocString((WCHAR *) L"system");
        VariantInit(&pokeVariant[2]);
+ |2 C0 E3 @% a9 D        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;
: @9 D; C3 n# v3 i$ ^3 P
//        Set the DISPPARAMS structure that holds the variant.
: M0 `; n6 F( s* b8 t! A
& P% U* S" L: h. H        dp.rgvarg                                         = pokeVariant;
- ?" i0 ], ?: ~0 _, V$ f) O' `) I        dp.cArgs                                         = 3;
" Q+ l5 t) c* L3 p' D        dp.rgdispidNamedArgs                 = NULL;
; A' X, j7 G# _! a2 f        dp.cNamedArgs                                 = 0;

//        Call IDispatch::Invoke()

. l/ d( b+ ~9 Y( F7 K        hr = m_pDisp->Invoke(
                pokeID,
" [4 E0 N, ~) N' C9 F                IID_NULL,
  C4 M8 m- g5 Q9 i" z                LOCALE_SYSTEM_DEFAULT,
                DISPATCH_METHOD,
: {3 A4 a& l, K/ I                &dp,
+ _1 @$ Z4 G, N8 X! x1 ^2 j9 I                NULL,
4 f+ W6 f' i+ @1 G4 w' y                &ei,
; t  v* @+ ~6 v' v) K2 @                &uiErr);
" r2 C- w8 z! ?  x$ E5 C- j% }4 g
; N2 V: \- O) a5 E  L        SysFreeString(topicStr);
2 N9 {- ?$ s( P- s  V        SysFreeString(itemStr);
1 l) u# r5 w  N2 ]* k1 D5 w4 d        SysFreeString(valueStr);

, b2 T1 L0 A: F' u9 C2 H, i现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
$ \( ?7 x6 W* `! h7 e" W5 _! w3 A此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？


2.这是request的程序
2 p8 a4 ]! D6 X! R! C  `& C//  Request a value from Extend
6 }( S$ E) i9 Z9 j" K. i; M0 C( [//
  `. o$ B5 e, c9 y6 \//        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
//        BSTR into the variant structure.
# \% C- o8 s. o% c2 V+ e. |9 ]
        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
* [& ?9 Y$ T7 Z& f6 s! h9 X       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
4 s4 h, S: S6 G! I  S+ H        VariantInit(&requestVariant[0]);
* c+ _  m& j' a" O9 x        requestVariant[0].vt                 = VT_BSTR;
        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
$ N  L+ S% S/ d2 M% T        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
1 g, R6 q1 o$ J        requestVariant[1].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.
1 }% u! d, m' j$ t  q$ W& s
        dp2.rgvarg                                         = requestVariant;
2 T% i  y; Z( i        dp2.cArgs                                         = 2;
7 i/ O, h% U6 a* I; i. G/ ^        dp2.rgdispidNamedArgs                 = NULL;
, ~7 L. k+ z3 O; B) Z        dp2.cNamedArgs                                 = 0;

        var.vt = VT_EMPTY;

' t% x; f+ s& V  ?- e3 X//        Call IDispatch::Invoke()

2 y; ]# W5 }7 k- ?& D1 f        hr = m_pDisp->Invoke(
                requestID,
! O' P; A* @* p7 @: j# R( H6 d4 a                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
& J/ _' S6 n8 R1 [* u. l                DISPATCH_METHOD,
4 H% {- U6 t+ h2 W                &dp2,
                &var,
                &ei,
: {3 o' v! j, I4 c, Q' u                &uiErr);
: r( J/ g: R8 J6 i: m6 {
        SysFreeString(topicStr);
/ p- x' l5 J0 `$ H        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
- H( I/ s' z) E2 \: G如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？