设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4743|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:
* H6 c) I8 j: l" pkanal:= DDEConnect("Excel", "Cost");$ t  ~' F7 ]: B* T( K) O
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);" j& @, l+ R8 u" [5 ~. U
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);, {" g4 w8 w& ^) K5 c7 A2 e/ p) }
DDEDisconnect(kanal);5 D; E) G6 [0 W! O; P  [# E
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。
: [- T8 |* a) a/ j% K: T
0 W% J0 z# K  a. k$ N, M% g) o, q请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑
) T: P' a( E9 a' R2 t' [$ w2 M
8 E; e. a  B+ F/ _+ w$ ^
2 z& @3 j5 e6 j4 `% y木有人理我么?
+ ]% B8 ^1 V  L. |( J! D  L- k
4 ^8 c, ?1 U9 ]% b1 o2 w* U我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
6 X5 m& ^7 g3 p1 e: w, {: e$ N# w$ c
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);/ h/ @6 M( Z, k# C4 G0 x0 p
8 ^3 d% P& }* W0 k7 ?2 H* a, w7 J
但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 8 d8 y' g: A* d$ I2 r# d- I% ^
dde确实没用过,不过之前用过其它接口,不知道有没有共性。- A) r# Z. |: e& O

6 v! Y3 _( ^/ b7 U触发语句是这样写的execute("        'cost'   ...

. o% L9 K' D. Y6 Q谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
. d% d0 T. ?, }, h& c
taoyifei2000 发表于 2012-3-29 21:37
+ E  H% n) S8 P* \  Y1 edde确实没用过,不过之前用过其它接口,不知道有没有共性。* }; P6 O1 K8 w* G
% z2 c1 {1 a# C6 S- c- d  f
触发语句是这样写的execute("        'cost'   ...

) \& H: y, |1 @6 S! ]& X& p
; w/ v4 I/ g, Y* z2 C* D不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。
; O3 W3 x# E$ l& f2 [5 z
! P3 \0 M9 A5 H  g1 s" n. C诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑 ' L( J( T* c- c* Z
若叶繁茂 发表于 2012-3-29 22:03
  M( Y) I) D& u; x不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

3 g6 E* H* y# N+ z
2 @7 ]& Z! m& q5 E, O& 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
1 R* j* M) O1 w. x& R. k! v我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

  h7 j) B, Y1 R谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
# `1 a  N7 Q3 D# U# X+ }% @. F& K+ d  c( t' f, A
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。+ F  `8 `& _& H, Q- m" w0 l) a% f; R
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:9 M! S' E, g  {. O
is
9 g- I2 E+ c0 w        xl: any;2 ]& U: v/ M. t
do$ H( o' q% a, p; y: Y8 u
        if ActiveX.active then, I& |6 q! ]; a% E# x, a
                xl:= activex.application;1 z7 K% w2 b& a5 q* U
                xl.call ("Macro_Reset");* @$ S8 S3 e* W
                activex.active:= false;
* b6 x8 g3 g/ f: }- q        end;
3 G+ f9 a1 z( b: q  m4 f% u        - I1 y0 Y7 q3 A1 \2 a& t; X! U% o
end;, c7 L$ @' o, o5 v
9 o6 W5 c! X; O
显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~, H+ M, W. X$ n: `; j

' C+ N! F( O  C! o9 D4 v5 n期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-11-6 03:57 , Processed in 0.014150 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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