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

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
, ^$ ]% g/ G! T! y7 d8 Mkanal:= DDEConnect("Excel", "Cost");
" ^1 m+ h- G5 B' e* K3 i) r: TDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
- \. e7 V& a; q( e8 zDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
! w# w1 q. S5 [! Y# jDDEDisconnect(kanal);
8 p+ y5 a6 V' a6 |* A系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。

$ `/ N' b2 O% k- m' Z2 h& \请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

. N6 F5 k+ a: x$ x  v5 c
- u) ~* b8 b+ L4 @, z/ O# A8 T5 ^
) q% N9 g; v2 G! J# E$ o木有人理我么？
8 p, P/ `$ T% Z! d( [
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
7 f' X5 @8 |2 J% S8 Q4 c
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
; n3 Z" F, n2 u3 H
但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。
+ X! w& a; _" L
7 d% B4 f: Q+ S7 g9 S) A触发语句是这样写的execute("        'cost'   ...

. x( V  \. L6 M* {- v; l谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

  Z) P  E9 U' K  p( R: T, e

taoyifei2000 发表于 2012-3-29 21:37
! W8 l$ T3 `. u* I' _dde确实没用过，不过之前用过其它接口，不知道有没有共性。
1 l1 H! q0 O$ N5 M! D/ O/ g
+ \- G$ `4 g( R' M7 O触发语句是这样写的execute("        'cost'   ...

: i/ X* ~9 K6 E# ]: N* ~5 k2 B  f7 v不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。

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

五五

若叶繁茂 发表于 2012-3-29 22:03
0 V! Q5 e. v6 C: I0 q不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

8 o8 C: f0 K# h# c8 Z" o# O
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

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

若叶繁茂

五五 发表于 2012-3-29 23:13
9 p4 N& C0 C) R$ ]* }我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

/ ]% Z" `6 }% ^谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。

8 b  t: r: ]. {: P我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
) P6 v/ O/ w  T& S) n* E2 t按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
, o* ^/ T9 m: Sis
        xl: any;
do
% j$ L. z: }* N, \6 L% ]( D        if ActiveX.active then
                xl:= activex.application;
                xl.call ("Macro_Reset");
7 p9 h& R# G9 U: A9 j                activex.active:= false;
( s( \( r1 w& O5 `! T7 e        end;
9 X8 u6 X! }' d/ P9 L       
; L7 @# ?$ t4 K. ~9 Send;
9 [. M  t& l+ ?+ s! E! Z0 c) M5 E0 l
2 {  Q1 z$ y1 R& ~, G5 E# ~显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
# ~6 q7 [0 B3 S+ N
6 x* w. E" S* f2 M: i期待你的恢复~~