) N7 M8 S5 r. w$ c$ ^ valueStr = SysAllocString((WCHAR *) L"1232"); 7 V* \% x' @* _. H! V VariantInit(&pokeVariant[0]); ' T( m# u8 f" @! G
pokeVariant[0].vt = VT_BSTR;3 x0 o7 X6 _3 Y* @8 M2 b/ V
pokeVariant[0].bstrVal = valueStr;' ^4 s+ i z0 Q( P' T
- h2 d4 Z$ R; r itemStr = SysAllocString((WCHAR *) L"global0:#0:0:0:0:0");0 w# K( E# T' i+ L( X( f
VariantInit(&pokeVariant[1]); ) O7 B- a" b0 o: Z/ [8 k5 I pokeVariant[1].vt = VT_BSTR; & F9 _# C8 {* X0 T pokeVariant[1].bstrVal = itemStr; + H: ^+ u$ h- h8 R" P7 a, c6 H1 p" E, I. M# m1 D/ u
topicStr = SysAllocString((WCHAR *) L"system"); ) G: g9 X0 v: s2 I* `- T VariantInit(&pokeVariant[2]); ; D2 ~) Y' c% B) B, A
pokeVariant[2].vt = VT_BSTR;( t! i' g' s4 V. a
pokeVariant[2].bstrVal = topicStr;- _; C% i" X9 C" f2 t
) c h0 L2 b* L! w// Set the DISPPARAMS structure that holds the variant.' E+ L; p: [2 L4 e! @+ s" A2 W
8 ^4 n! I& A/ p& c d. n
dp.rgvarg = pokeVariant; : e4 x3 {/ \, q7 P3 r! T dp.cArgs = 3;: ~; `' j9 |3 V9 }
dp.rgdispidNamedArgs = NULL;5 [) S1 ] S$ O
dp.cNamedArgs = 0;' s7 d7 t, M& n# l0 |
, Z7 m- t2 w$ {8 U% |// Call IDispatch::Invoke() ! j& R' s$ R$ ?$ S) h( ^% U0 a! J" p% T ]6 P/ ?
hr = m_pDisp->Invoke( 7 T' U* o( O" {* R pokeID, 4 H# ^; r* y3 S; `8 |0 N/ |/ f9 A IID_NULL,5 E+ L% N( S \( a) p' J
LOCALE_SYSTEM_DEFAULT,8 |: Z. Y/ A3 p$ J/ Z3 Y
DISPATCH_METHOD,0 }4 @8 i7 }/ ]5 U
&dp, " e. }+ X- O, I, G {, ~% _, q. f NULL, 3 I3 g; w, i2 E. c9 Z4 z &ei,0 ?( L( Y( h3 @6 \3 m: C6 v* ~, _
&uiErr);, A1 e/ q4 {+ b% A: \
4 C: ]6 |+ x7 o% f$ T SysFreeString(topicStr);# k2 {6 z9 A1 ?1 X! @1 E
SysFreeString(itemStr);& U4 K7 ~2 s% `& M: Z. T6 z* n( {# j
SysFreeString(valueStr);' i U5 z$ _8 C/ Y
! O; v5 n# T; Z2 x2 G$ O现在这个程序可以实现将1232这个数据发送到extend,extend有一个对话框弹出并出现1232这个数据,不知道这个对话框为什么会弹出并显示这个数据??? & H, ~0 \, b1 I, ~$ ~3 `此外我希望将这个数据赋给extend程序里面的一个变量,请问如何实现???? - K) f% s. J: s/ r* R" z) ^* N& q9 H, {1 d( I1 F( w
) H5 _0 v5 j& k" @) d6 u
2.这是request的程序 8 k3 _& v2 n( T1 E7 \9 E. n// Request a value from Extend 5 c3 t2 i+ S ^# L( Q& ]- k// ) W/ @2 P0 \8 I+ X* T3 |// Initialize the variant that will hold the BSTR. Set the variant's0 p, ?3 N$ W7 h( x
// type flag to indicate the fact that this variant holds a BSTR. Place the1 q# c3 m5 k, D0 T. t( Q2 G
// BSTR into the variant structure. }# H! J- f- k