c++和extend的COM接口问题

xumeijian

我现在用c++编写了一个程序，希望能够和extend交换数据，以及自动对extend进行一些操作。我参阅了例子里的关于OLE AUTOMATION方面的c++程序，但搞得不是很懂。比如说，c++程序向extend发送一个数据：
8 O  }  O$ R* z8 BName = (WCHAR *) L"Poke";
                
$ P( F( |# s2 X$ ~9 V% B* ~        hr = m_pDisp->GetIDsOfNames (
                IID_NULL,                                // reserved
                &Name,                                        // Array of names to get IDs for
                1,                                        // # of names in the array
" V5 c4 K/ S5 q2 B                LOCALE_SYSTEM_DEFAULT,        // System locale
                &pokeID);                                // Array of IDs to fill on output
+ R. D6 _) W) D2 |                       
2 w$ k  i* f: |  |; w- \        if (hr)
                {
                MessageBox ("Get Poke Unsuccessful");
                return;
                }
: U/ _$ Y- r0 [% S7 v
4 P) S' n+ q- Z' L/**************************传递数据给extend**************************************/
2 k, i: `, {" V- B8 b& E0 n        pokeVariant                         = (VARIANTARG *)malloc(sizeof(VARIANTARG) *3);
' ~+ H- B- s! p( u       
1 m# H8 p( |9 Y8 M         valueStr                                 = SysAllocString((WCHAR *) L"1232");
. P3 J9 u5 N! I6 A$ u        VariantInit(&pokeVariant[0]);
        pokeVariant[0].vt                 = VT_BSTR;
        pokeVariant[0].bstrVal         = valueStr;

        itemStr                                 = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
        VariantInit(&pokeVariant[1]);
        pokeVariant[1].vt                 = VT_BSTR;
1 @; s5 F* c: a& k, `7 A        pokeVariant[1].bstrVal         = itemStr;

* i: x& [! c$ l, O: W. g7 y: Q9 C          topicStr                                 = SysAllocString((WCHAR *) L"system");
' W% b' W. |* ~% X! j7 n, s9 n, h1 `( S        VariantInit(&pokeVariant[2]);
4 |. e; X6 j/ _7 S- `& p7 L2 ?        pokeVariant[2].vt                 = VT_BSTR;
        pokeVariant[2].bstrVal         = topicStr;

//        Set the DISPPARAMS structure that holds the variant.

8 {$ ~! I9 [5 ]; n5 h! |! R        dp.rgvarg                                         = pokeVariant;
) d1 S) R( s' b0 g3 j% a6 c        dp.cArgs                                         = 3;
; _4 S: C) f( I, [6 @* n5 j        dp.rgdispidNamedArgs                 = NULL;
; h* |9 p" s5 R$ @) [6 ~# B& M6 G        dp.cNamedArgs                                 = 0;

3 b4 @, C% H$ Y% o# K: }//        Call IDispatch::Invoke()

# T  j8 J# }# W8 R6 I        hr = m_pDisp->Invoke(
                pokeID,
                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
: i  [8 N( |3 K! b: N2 H" x                DISPATCH_METHOD,
; _$ `9 v% R) D& G2 A                &dp,
                NULL,
7 O4 l( Y( J9 b" o* B: C                &ei,
                &uiErr);

        SysFreeString(topicStr);
% k/ [0 W2 c; Q( v7 I        SysFreeString(itemStr);
' ^! b8 F# Z' D: H% T# ^- v        SysFreeString(valueStr);
4 J" M: Q; U% v" o" q# I( v) P
4 R! U; v  i" P1 U2 y% P$ ~现在这个程序可以实现将1232这个数据发送到extend，extend有一个对话框弹出并出现1232这个数据，不知道这个对话框为什么会弹出并显示这个数据？？？
此外我希望将这个数据赋给extend程序里面的一个变量，请问如何实现？？？？
& w- E  R, U# m
# _3 e/ ~) L# x; L& B1 R) D6 ~4 z5 s6 m
8 k" q) g7 d7 H/ d; K2.这是request的程序
, q8 i5 n& M+ R1 H//  Request a value from Extend
//
//        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
. G7 F7 j" ]5 w5 W  i6 g. _//        BSTR into the variant structure.
- b4 o: k; e) }6 w
7 G- I" R9 z& \+ i9 b' H        requestVariant                                 = (VARIANTARG *)malloc(sizeof(VARIANTARG) *2);
       
        itemStr                                         = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");
; K  u7 A  `" Z9 w5 A        VariantInit(&requestVariant[0]);
        requestVariant[0].vt                 = VT_BSTR;
. O6 G: n# r+ Y0 O9 q( O; z        requestVariant[0].bstrVal         = itemStr;

          topicStr                                         = SysAllocString((WCHAR *) L"system");
, I4 V& l: o1 P        VariantInit(&requestVariant[1]);
        requestVariant[1].vt                 = VT_BSTR;
5 o* Q" c4 G) q3 K+ g! o        requestVariant[1].bstrVal         = topicStr;
! w3 h: v+ l" |# p; |
! T) J' ~, a0 g- |//        Set the DISPPARAMS structure that holds the variant.

! D9 T+ A2 L$ g, F        dp2.rgvarg                                         = requestVariant;
        dp2.cArgs                                         = 2;
        dp2.rgdispidNamedArgs                 = NULL;
        dp2.cNamedArgs                                 = 0;
- Q0 {! w  S- y$ ~! X
        var.vt = VT_EMPTY;

//        Call IDispatch::Invoke()
& G* Z$ p" R" G. J2 W9 i9 b. b
4 z2 `5 C0 `0 X1 n        hr = m_pDisp->Invoke(
                requestID,
, G, U' W4 K* q" V/ d                IID_NULL,
                LOCALE_SYSTEM_DEFAULT,
1 @" w. m/ q  `0 J. D! r                DISPATCH_METHOD,
                &dp2,
3 q* r7 s/ g. ]) Q# }% g8 J: J% N                &var,
                &ei,
                &uiErr);

0 L* O2 [2 h8 c- H        SysFreeString(topicStr);
        SysFreeString(itemStr);
请问该程序是获得extend里面的哪个值？
5 R5 _+ F, |) F- B3 }: a如果我希望获得extend程序里面的某个变量的数值，那个c++程序应该如何实现？？？？