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

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
( `0 V# T: R( y3 d& }& Nkanal:= DDEConnect("Excel", "Cost");
' t" t. B) f9 `4 r# G/ g9 {1 g  SDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
7 z( u0 l$ B/ NDDEDisconnect(kanal);
& {  z, ~; j( u$ Y! W+ {系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。

4 B: m+ S5 i; h6 H: H& ^# L2 R请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

5 K+ u; F0 D( x1 p
  G- `; D5 G6 K/ B木有人理我么？

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

) w. w! M2 z6 i# o% o& \8 {: nDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
; h$ L' m0 K3 |
但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。
  [% a4 @; g; E3 b
触发语句是这样写的execute("        'cost'   ...

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

若叶繁茂

: l6 e. J, @& @) w* m# Q

taoyifei2000 发表于 2012-3-29 21:37
6 Q( A) y3 t" O: |% O/ X( F, c4 Kdde确实没用过，不过之前用过其它接口，不知道有没有共性。
! k0 P9 ^( I; p4 P
触发语句是这样写的execute("        'cost'   ...

4 o& g& W! C7 _  J
不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。
+ c$ {# C/ K8 t7 D
; V8 `: `) ]- {诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五

若叶繁茂 发表于 2012-3-29 22:03
0 G( y: V$ [$ J7 l不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

: Y& S$ ~% r* s6 K% d) M5 S
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

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

若叶繁茂

五五 发表于 2012-3-29 23:13
3 t& P4 {* ^4 V$ D我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。

我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
+ @- t4 ~/ s) ~( u, W  k, H按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
is
" b. y5 ?, k  B7 B        xl: any;
( m+ K! G8 X: Z0 @- @& r/ ]. q, [; [do
& F2 `* ^/ X6 D        if ActiveX.active then
                xl:= activex.application;
6 v" t: v9 [( O4 o1 e1 N8 `  T                xl.call ("Macro_Reset");
/ D" V9 g+ `9 S1 D% [                activex.active:= false;
        end;
# Y) Q* s% X  \/ f: {- s: A       
end;

- d3 ?. T6 z$ N: h显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
( o6 J6 m  _% I: c
期待你的恢复~~