设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4156|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:
! L/ t/ Y: a1 P" c- v) a* H2 \kanal:= DDEConnect("Excel", "Cost");
( q" i* M: x/ @9 a# VDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);) M) J6 o2 i; b! y9 J2 W$ w3 @
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
* M# ?* `# ^5 NDDEDisconnect(kanal);, a* m3 o$ c7 t: L8 i5 g! t7 Y/ j/ x
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。
0 v) m! N4 K0 G4 G
+ A9 o6 j# _, K请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑
  `* F' v) W  N$ ~$ c3 J: x  r* x& v' F% i# g' S# z7 j
5 J2 n& c2 C5 F* J7 Q0 o1 |
木有人理我么?+ a# F- B6 b' T! T7 I4 C1 _
. C% B. x  _7 C/ ]
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:: f- {4 B2 G& [8 D' W# I

9 B! J7 x1 {* Z8 w1 BDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
! z- B& [0 v' h" Q' r
! _9 K- m$ R8 _4 g+ z但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37
# j# @7 S2 g% b  A4 w( N9 W& Kdde确实没用过,不过之前用过其它接口,不知道有没有共性。
/ U; |: Q* L# @& Y( W5 u- F
" u$ Y; b% S" Q- S$ u6 t触发语句是这样写的execute("        'cost'   ...

( n/ P' k' c7 B: c谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
' W! N- n; e! Q
taoyifei2000 发表于 2012-3-29 21:37 # N8 L4 R. C8 B, x$ Q- M, z7 b- K) g0 L
dde确实没用过,不过之前用过其它接口,不知道有没有共性。
, a. P* w6 X0 o5 e' i
- |1 w0 h% z. V6 {触发语句是这样写的execute("        'cost'   ...
8 ~- R1 j0 _0 D+ `/ M7 g

% p% _9 `, t8 F不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。% d, Q& ?# v. R3 R9 ^$ k

/ p4 J7 r# o9 c# ], x! h诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑 ' ^, s$ Y0 Q- Q1 e4 Z' K
若叶繁茂 发表于 2012-3-29 22:03 0 r' `. \0 k7 ~" [% e, W/ l
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

: z5 z% N& v: \9 X$ U: n; z6 Q* c0 G) W0 y6 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
6 i) ^6 Y3 e0 E. Q我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...
+ p( R* \( }0 `. b
谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。6 J$ |6 }  i( C% w6 e6 L/ S1 A
: X  Q( F1 F6 i6 _, S% ?, T
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。/ h2 t! P5 \9 t, d7 A) Y2 x) ^
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:5 b: V1 ^6 C) C4 g( I- J
is
" ]' C1 c/ r9 |& h) e        xl: any;- _* ~) _! K9 B: W1 Y9 g
do* a5 _. n0 j6 B# u6 P& d' a3 ~
        if ActiveX.active then
. S0 x# w9 u" V. P, D                xl:= activex.application;# `& Q8 |# h: j" l" n% o' Y3 g
                xl.call ("Macro_Reset");/ V7 z) ^* S* ~* [2 j: N
                activex.active:= false;
' h6 q2 ~* S- `  R1 Z        end;8 }' V& P  Z  p; w
       
6 G  W0 ^+ y6 ~- N: V# B1 Send;$ d9 u: _+ t6 w7 A7 |

5 E) W9 c4 K5 Z" ^/ x' B! i显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~
1 q3 A& @5 i9 _8 j
* Y' k8 @0 q) I  c1 ^5 T期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-7-3 04:41 , Processed in 0.016431 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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