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

若叶繁茂 · 发表于 2012-3-28 22:25:21

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
kanal:= DDEConnect("Excel", "Cost");
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
DDEDisconnect(kanal);
系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。

请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂 · 发表于 2012-3-29 16:43:02

本帖最后由若叶繁茂于 2012-3-29 17:47 编辑

木有人理我么？

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

DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);

但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂 · 发表于 2012-3-29 17:48:15

若叶繁茂 · 发表于 2012-3-29 21:57:39

taoyifei2000 发表于 2012-3-29 21:37
7 A% l6 S6 c( J0 G8 w7 b4 ~dde确实没用过，不过之前用过其它接口，不知道有没有共性。
5 s/ |4 b, `% E! l0 {8 f7 _" @" F |4 @( u u2 q, ~% M! t( F
触发语句是这样写的execute(" 'cost' ...

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

若叶繁茂 · 发表于 2012-3-29 22:03:28

本帖最后由若叶繁茂于 2012-3-29 22:10 编辑

taoyifei2000 发表于 2012-3-29 21:37 1 _, g3 u& h5 d% }5 G) ?# T8 R. x
dde确实没用过，不过之前用过其它接口，不知道有没有共性。5 d/ H1 G7 E% I2 K! c2 M- q; H

9 h0 T+ U/ u& f$ q! ]8 p% `触发语句是这样写的execute(" 'cost' ...

不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。

诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五 · 发表于 2012-3-29 23:13:45

本帖最后由五五于 2012-3-29 23:16 编辑

若叶繁茂发表于 2012-3-29 22:03 8 @+ r, h9 u3 Q( I; l
不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦可以用ActiveX操作excel表格的。。。我都是这么干的觉得效果还行。。。

五五 · 发表于 2012-3-29 23:15:32

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

若叶繁茂 · 发表于 2012-4-2 20:50:13

五五发表于 2012-3-29 23:13 $ F* G+ [% ]4 Z6 T: J4 Q5 Q
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦可以用ActiveX操作excel表格的。。。我都是这么干的 ...

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

我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
is
xl: any;
do
if ActiveX.active then
xl:= activex.application;
xl.call ("Macro_Reset");
activex.active:= false;
end;

end;

显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~

期待你的恢复~~

帐号		自动登录	找回密码
密码			注册

[求助] 请教关于em-Plant做client的DDEExecute的应用