设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5620|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:
/ N) i0 o3 e9 F, e- V$ O4 ^kanal:= DDEConnect("Excel", "Cost");
  u. ~' h8 B; jDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
8 b$ C$ k# U' m6 y2 {+ G  P- v7 XDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);' A3 ]0 e" r  y1 e2 j6 E( T- p9 e
DDEDisconnect(kanal);! Q3 \) [: a% A: M) `  y! Z
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。  Q5 w2 v8 T: @# e
! Q1 P3 r* R, e( s. ^
请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑 $ F% l) F! [. ~( Y* f+ s

- L. {% }, P) h5 F. p( ?+ _, `) b6 Q/ Z
木有人理我么?
6 u, t6 X! d  M* ?& E2 Q: A9 X5 q, R1 `" ?& \
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
- Z6 E. p, V6 {* {, q4 }( l4 s3 |. k
( {* `& G9 k; M# _4 {DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);- \# Y+ l/ U, v' @$ ]" z  a- ?" x8 R

' E7 I, P! _' @6 T但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 4 U  d" H5 c8 W
dde确实没用过,不过之前用过其它接口,不知道有没有共性。  G+ G+ w5 ~1 O" t
0 }3 |* V& [* F1 z& n* x
触发语句是这样写的execute("        'cost'   ...

6 T6 M1 b+ B$ H! G9 U谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑 6 w6 v, S# P. V
taoyifei2000 发表于 2012-3-29 21:37 , P7 R" N, N% N# V
dde确实没用过,不过之前用过其它接口,不知道有没有共性。! l- R+ ^) h" y- m( D; c7 w8 C
  I6 J1 Y1 j! c" w/ F7 n
触发语句是这样写的execute("        'cost'   ...

" P9 v) ]0 \6 @$ v- M1 D; M7 m7 K1 Y! j( ]+ X
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。
( |; F- A, g2 w: M/ b
0 a# B. E* h% D$ ^诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑 % q. [  H5 G# V
若叶繁茂 发表于 2012-3-29 22:03
' a# b$ C6 D6 |! F" N+ O, F: P1 F* X不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...
/ `9 v: n( Q! M1 r6 b

+ ^- `$ `: |* G  b  h' d6 V我也没用过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
# [# I. c  I9 j# o/ m* Z  n0 s' K我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...
* @8 K3 O0 J4 Q8 V+ E7 K
谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。' U( M7 E* ]5 X  T# z! G- w7 e7 c, ~1 ?3 n

* F4 k2 k7 j! l& K3 E. @5 [我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。; ]( V6 O1 B7 k! A. r4 g  V
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:
: N: q. r# n, Z  u+ i$ R! u- nis
5 W6 V. }6 p( H$ H* ~! ~/ L. r, C  M        xl: any;2 C# T% n" `2 I& P$ g
do
" w1 C/ G% _7 `        if ActiveX.active then
. x8 ^7 Q  _) {& l                xl:= activex.application;) M% X2 q* p( X6 d
                xl.call ("Macro_Reset");
  u  @1 D! I$ N: e# [                activex.active:= false;
( w. p2 S8 }- U6 y* E$ U        end;
6 \0 I+ q5 f( O, j3 `& Z        ) r% a% `: r. K! d/ R
end;
! W0 v1 q+ s4 d) b
4 ~7 d; q7 j' Y3 C& j8 x7 B显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~
5 \3 ]& C  \* T9 S  C
( j/ f$ ~6 T4 k) Y期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-7-26 18:10 , Processed in 0.013415 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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