请教关于em-Plant做client的DDEExecute的应用

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
) R2 }. f8 a0 M3 okanal:= DDEConnect("Excel", "Cost");
4 _4 f; R1 B7 `+ L9 _9 JDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
  T& w# q% X0 R6 nDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
DDEDisconnect(kanal);
系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。
. a' |8 v- V: J
请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

  n! }5 F0 K4 @3 |. @# v! J9 I; Z
$ T8 E6 \  m: T  b" x, f; k* ]木有人理我么？

我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：

DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
" O5 f8 V+ a# ?7 y  w
但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。

触发语句是这样写的execute("        'cost'   ...

谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

! j$ N3 G  i9 L1 X: o: b3 ?

taoyifei2000 发表于 2012-3-29 21:37
" R1 \, \7 ~) p9 K2 Odde确实没用过，不过之前用过其它接口，不知道有没有共性。

6 Y* l. c) ?- T2 r% t触发语句是这样写的execute("        'cost'   ...

0 M& ]) J& U: H" _2 C! U
不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。
7 }+ j# @4 f+ ~5 r1 x
3 M% D' Y# U; ~: T$ x: Y& m诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五

. f  F8 k# I' G6 G0 t+ m

若叶繁茂 发表于 2012-3-29 22:03
0 q7 }7 v( I4 U8 T* l( ?+ G不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

7 c. Z5 i4 _$ G' ]# j
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

还有我按照你的语句写了一下 电脑并不沉默 但是只是单纯的把 Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value 这一段内容作为字串赋值到excel里面了 囧。。。不知道为啥。。。

若叶繁茂

五五 发表于 2012-3-29 23:13
( w, h; Z+ x3 o; c* [% v我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

+ J4 Y/ R( e3 n- G8 Q+ Z谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
; f: p; H2 J0 `: ?1 j" T. F
4 v2 Y" J* E2 [: y; @我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
- @1 L; t9 Q2 q按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
is
* w- u& d) q. c; D) \        xl: any;
do
+ h; t2 ~+ _0 Z( ]$ M" ]/ ?6 C) _        if ActiveX.active then
                xl:= activex.application;
                xl.call ("Macro_Reset");
                activex.active:= false;
' M$ R+ C  I1 E$ \$ Q( |: R) M/ R        end;
. I5 z+ f+ L0 J0 n7 x/ d; e       
- Y, N8 C0 I$ }# h& H, Tend;

) y; q9 Y" ~2 C& v. \) n; W( A' U8 X显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
! A0 E: M5 B7 @' W
期待你的恢复~~