设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5621|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:+ X# F& ]/ d$ k& J( Q. c
kanal:= DDEConnect("Excel", "Cost");! b; O1 g" r! ], h3 |
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);7 H3 \1 W8 @% G, w; ~! S9 }
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);$ Z& M3 p. u  f. P6 X* M: e
DDEDisconnect(kanal);
7 ^3 _0 T' R, C. F系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。: k) Q% ^6 i8 R" P
2 [* |. d  s; g. Q$ w1 F
请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑
0 q; ^, {5 V& _. C# j7 z/ }
) J- [7 f+ v$ d. B" ^5 s. ]) a6 J7 U& [# m; C, G6 ^
木有人理我么?
  p' w! r" D% O, H1 e  [
( ^# c. M1 V, w1 O: k9 h' A" {我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
. E" S/ n8 O) F1 ~# h& \! W- I  ~3 e4 }3 a$ f. T( w5 L
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
+ u2 I# r7 Q( ]. J) Q; i% L
8 j6 v; m9 E# Z2 C; e但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37
. O! Z- B/ y5 M- V. g# l: Ldde确实没用过,不过之前用过其它接口,不知道有没有共性。
4 E! W' |2 w" F( J# j9 k  a8 c& s+ I3 g; g: U6 Q
触发语句是这样写的execute("        'cost'   ...
4 n, [  S. ?6 }0 Z
谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
& C  p3 v; |9 o/ V$ b/ T- @; S$ D
taoyifei2000 发表于 2012-3-29 21:37
  G6 K9 B6 w, B- W1 N$ y. |dde确实没用过,不过之前用过其它接口,不知道有没有共性。
! _1 a5 i4 ]" e. f: O0 q) z8 B$ L: o$ k7 x
触发语句是这样写的execute("        'cost'   ...

& N9 B& ^- A$ g. @
, H9 f2 _6 [. P+ U% j  N' n不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。
- `% x. A/ C, y( [3 M4 c. c
' Y( \9 k  F" e  K) O诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑 0 ~; U4 Z5 m+ L: r7 T& b& B
若叶繁茂 发表于 2012-3-29 22:03
) c4 W: o1 w  l不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

. A/ a1 D, k" S+ _
8 O6 ^. Q$ O; X6 T2 q我也没用过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
: x' g: H# W: g我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...
: o0 Y( K1 g# G2 c/ x
谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
9 K# M2 y# k" v+ d, [6 I7 d: q& B
' D4 Q  q4 A6 i  Z! ?我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。6 [" ]. C$ j9 e0 y( K/ k' ?( l
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:
& w+ [; M# o# z/ \0 b+ ~is
7 L0 s; L  M! T7 x2 _: I/ ?6 n6 s: {7 a/ W        xl: any;
6 p& z7 T2 g" e$ a5 {& e0 |, Cdo* g: r: d" D' o* n+ T" i% B
        if ActiveX.active then& ^' B* z2 ^) o; a0 M% t! h
                xl:= activex.application;
  F$ v: y) W' y4 B) h' i& A9 @                xl.call ("Macro_Reset");
0 t8 o  Q) u! J! i! g+ W' l4 N                activex.active:= false;
5 Z5 M& l% n8 p/ j        end;& s  t  C# s" I4 v/ c
       
  B; h- Z: {3 g2 B$ B1 Tend;
$ C3 p0 {4 {! _2 a7 h0 W, X; W
+ w0 k8 b, a2 \, J) E5 Y显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~/ q" v9 U+ ?3 ]- |; \& y

. Y; P6 `. V2 v. y. i( y期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

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

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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