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

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
" w( [2 ^6 C! W" ikanal:= DDEConnect("Excel", "Cost");
# ^; J: q4 `" V0 [3 FDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
4 n, G# w2 b, i6 A. E5 ]5 h( cDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
DDEDisconnect(kanal);
系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。

2 [+ q% ~8 n! x8 D请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

  Z7 R8 P4 G1 s2 O( \% o, M: @; U: R* F
8 ^! u* M- `* r0 C( e
7 m: ?% I6 s+ c( A/ f- K" o: I8 O木有人理我么？
- Y% `1 N" E4 Y, V" U; l1 t. N( ^! D  R
; K, j2 F" \$ E/ B7 K+ Y我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
0 g/ E& g* L0 y: f; S' ]8 k1 g% R
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
- ?# Q$ [3 v0 c
  R7 \% K! l/ L) O. K- @但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。
. F. J# f8 N( g, z  Z$ n
1 b( a) J! r  s& D6 l1 n触发语句是这样写的execute("        'cost'   ...

: m: O! V1 `1 E; `* U谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
2 V5 E* k9 I4 R8 s5 I% ^- rdde确实没用过，不过之前用过其它接口，不知道有没有共性。

' u5 J( b1 A1 S: u0 y7 K触发语句是这样写的execute("        'cost'   ...

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

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

五五

若叶繁茂 发表于 2012-3-29 22:03
6 f1 w& l; g6 u- d" m1 w不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

0 A+ ~- b& e/ T8 g1 m3 r我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

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

若叶繁茂

五五 发表于 2012-3-29 23:13
) `. Y4 K: P6 K0 F6 t0 ~0 u/ [我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

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

: @  ~: z- N% M2 R& x我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
8 _- F9 g& I) M: m按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
is
        xl: any;
, v& j5 b* [$ ~5 \0 Zdo
$ d4 y5 E* u9 m$ ~. K; b        if ActiveX.active then
                xl:= activex.application;
                xl.call ("Macro_Reset");
                activex.active:= false;
0 [- w' n, ]8 t% u; n1 K- z( G        end;
0 _4 l# f0 s# i) @6 A. M- {       
* g1 b- J$ i$ u% l; c7 R5 F% fend;
2 C" W% [! r; u& z1 k
) O1 a0 q: V8 H5 N: g9 c显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~

: L. t; |# ~4 L% ?% Y3 P期待你的恢复~~