设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5382|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:! T6 o  A# `  d% z4 S. |2 D
kanal:= DDEConnect("Excel", "Cost");" b, q$ B: o7 t. D2 b8 u- x
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
1 M& Y/ o7 E5 D, F5 m( Q& {' _- \DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);! b) a; ?/ t0 K" \! u; {: ^) D. p
DDEDisconnect(kanal);
! a1 s1 r) M/ b8 Q( f) r& v' E系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。
0 d+ T2 J+ K+ ^6 E+ c
& X1 x9 C1 s; z0 y4 M请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑 * W3 Q) U6 N  N& F# T% t
; A0 c& ^, T) F, _6 T( }" k4 `
- x5 A* p* Z, }6 O+ _
木有人理我么?
* T3 B* X$ Q- U3 C) x, P+ Y
- d' z4 j) r# {* a! x我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
) T$ n2 P8 J: f, W0 g+ R! Y1 H
4 ~, v3 |1 B5 k$ BDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
. O! U. z& F; Y- n" l
) d# f4 Z; a3 T7 n但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 . e0 N$ L$ N, q% Q7 Y2 }7 Y8 w+ [
dde确实没用过,不过之前用过其它接口,不知道有没有共性。, J% t8 y/ G3 ]6 N1 s$ {) T; i

% K5 F  ?* o' C. ^触发语句是这样写的execute("        'cost'   ...

" E. p6 G/ i4 D0 g& t2 V3 b( L5 J谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
, t, v$ `" h$ g8 i5 U
taoyifei2000 发表于 2012-3-29 21:37
! f/ s/ n0 [( R3 I  w/ Cdde确实没用过,不过之前用过其它接口,不知道有没有共性。% y7 S2 v' T! G+ [
1 S! {1 h1 p5 \, [0 ~
触发语句是这样写的execute("        'cost'   ...

7 ^  u0 Q: H, D1 s3 X+ v/ h* K* r5 u& t* t" }7 }2 ~
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。2 G0 q/ `: A: m- L
* d; u" i* M* b  B8 i3 j3 |+ L! [
诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
# Y+ H% v% I( x! q' l  N
若叶繁茂 发表于 2012-3-29 22:03   K2 o, f& }$ u% Y3 x
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...
1 y9 g2 M; `" X0 W( t

4 ]/ a/ j4 h( a0 x% C* Y, e( f1 S" n& i我也没用过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
& S$ f5 _9 r' b3 |: \+ Y: Z我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...
) u" b2 A( u9 y0 ~/ e
谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。4 e' S2 i& `( q2 T6 N: b  x

% u! c; Q) H; W( w我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
0 ~: w; T9 P' i7 u# l( L% Q按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:* _$ ^* S5 @+ W8 H. C8 _
is
$ O" F; m1 S( o2 B        xl: any;
% f! Y$ ]8 S) D9 c6 K7 i  u1 fdo
% [% T! m! o% N& S: U        if ActiveX.active then! H  t& m/ v2 p6 R+ ]
                xl:= activex.application;( H- ]* h; u) z0 F: M2 y- Q+ }
                xl.call ("Macro_Reset");& z+ f; [# E2 |' x1 _' l4 S
                activex.active:= false;' i8 i7 ~, u  X8 _1 t5 i0 h& f
        end;/ G$ `$ A. L% S" l' m# u; N
        ( d8 s! i8 [& R2 z5 Y9 W
end;
  c) G3 x8 c; d7 Z- d5 `
) g* Z# [7 P9 U, y0 Q6 t显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~; h2 D1 l( A, Y# c; R" {$ b! g9 }

" Y$ c: M9 Y$ h" G5 e期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-4-28 12:27 , Processed in 0.016239 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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