设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5161|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:# D  S# G! N5 }
kanal:= DDEConnect("Excel", "Cost");3 b$ a, `% F5 S- i4 [+ I: I2 _
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);+ U0 r; a) f1 q
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);1 l5 f/ h. N; J4 a1 i
DDEDisconnect(kanal);
3 x# B6 h- v- _2 e系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。" M& ?& Z1 c5 S/ w1 C. A' n. w

0 f' R; c+ o; h0 k请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑
+ k, L7 C9 C# x7 ^, Q$ q* \
3 t: {- z/ r/ z, W, @1 a6 d8 i% p
' x$ R7 J" X& K" ^木有人理我么?8 f3 Q2 E. W( U# N1 \) T
) V: y: O9 ^2 l2 Y4 f# U2 X! e) `- i4 t) n
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
* L! Y$ u- J% K4 _: I* I$ M9 j2 p
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);' f; O/ O  M$ C# y$ |

6 I% S& W; P( d但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 1 _5 b( {. o1 V. m/ ?4 t( p
dde确实没用过,不过之前用过其它接口,不知道有没有共性。' c1 Y4 `3 U( T' r# s" K

1 Q) x3 f( K2 Q* q9 r" y触发语句是这样写的execute("        'cost'   ...

7 z- m' Q& t* h$ w谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
8 @# F, `0 ?- ]+ s
taoyifei2000 发表于 2012-3-29 21:37 % n. S% w# s+ f3 F
dde确实没用过,不过之前用过其它接口,不知道有没有共性。8 {% A* j, y* O2 p! D
% `# L, ^+ R" M4 i: ]( K' h2 `: k
触发语句是这样写的execute("        'cost'   ...

* }4 t/ }9 @3 A2 b8 i2 _+ `& A
  I: j. u# J+ x, g" v不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。# O. o9 V" O' t! U2 n
9 l. v# X+ t, s/ ~* t1 Y+ O8 |
诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
. {2 l% _* |( ^/ d- {* N3 a& Y) A
若叶繁茂 发表于 2012-3-29 22:03
8 f7 z" \1 H3 _7 v- Q! A) g不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

1 c2 P; Y6 l0 m' L! L8 W3 y0 P
* |7 r% S9 e3 B. p我也没用过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
) T) b3 `: s/ k! m$ e: }% x我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

/ l% T5 S2 c! p) C% ~- p2 g2 w5 h谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
/ I$ k& S, }* g1 y0 {. F0 B% o9 ]* `7 g$ m! O; U9 k
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
/ _! r: j( ]. ~按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:
  U' Q3 A/ ~* w* q' l9 @+ j8 o1 |$ qis
" l7 y- V3 S" d4 @: B        xl: any;3 {) e: t' c0 h
do
9 K9 b* F5 _8 t2 }        if ActiveX.active then
$ V0 w, _: q5 E: k                xl:= activex.application;3 X8 e! P* q  `. S/ L
                xl.call ("Macro_Reset");
: h* Z" _7 ~" K+ D                activex.active:= false;
9 s" ?: Z3 z/ y: p! e" g        end;# t- k. m+ y% l
       
0 _8 W4 T8 w: L3 a5 a0 B- Vend;& f8 V1 S7 s, B! E; q

  Z  K7 X! C( M* F2 A显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~9 \9 C( `& ?. ^( w' P# _: l4 N' b
0 F# L; u) A& [' h. ?
期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-2-21 13:50 , Processed in 0.015805 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表