设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 4912|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:+ c* \' g3 B7 F9 _3 G+ t
kanal:= DDEConnect("Excel", "Cost");% A$ G# d, s# A/ O  N) W* n6 r. w
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
, M4 e7 g! f  F" L. m+ @) BDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);$ t/ m  h7 b# g  J0 z
DDEDisconnect(kanal);
& ^# \* s9 R6 {7 G) v# N8 l0 E系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。3 e. `: Z- o- I) S" r/ w9 a/ w

! v3 d% L( X; p9 [+ K( }0 |% G请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑
5 J* E  ?5 r! V+ h+ S' D2 R0 E+ @& X0 l) P

% u# f3 _2 w( A: {木有人理我么?! i% e& `* y& J  q  Z; \) W
' H' n$ C5 }% A" U" q+ ]" w2 s( X6 E
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
$ j  c8 Z" O  Z+ R- M" q1 y7 D2 S0 A0 U7 X, a1 B& p
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);) Y/ o$ ?! O* O- H$ V7 e

# a( z! A. y! D& }& k4 `但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37   Z0 z4 _0 I! W+ R, K& M
dde确实没用过,不过之前用过其它接口,不知道有没有共性。5 D6 g0 z+ d! W) z" y
/ B; _5 V0 E. @/ p, f
触发语句是这样写的execute("        'cost'   ...

( I# v" J" B: R; x, N* O2 G/ B谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑 : R# l% |3 w; ]2 e
taoyifei2000 发表于 2012-3-29 21:37 $ r+ F' Q6 u' L  k0 Z$ Z
dde确实没用过,不过之前用过其它接口,不知道有没有共性。
$ d  I6 \2 m* u% J; E7 e! E8 s' f7 e4 E# i5 Y2 U
触发语句是这样写的execute("        'cost'   ...
  w. F4 J( I3 j- L4 o

7 g/ [9 C! l, D+ E; A5 {不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。5 v4 ]- u- l' i  A1 B0 ?$ F; |
% z) W5 E' K0 q' {9 d
诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
. h; G. a6 \7 j
若叶繁茂 发表于 2012-3-29 22:03 # z% g- d( I6 c
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

. ]# N, x% Q, ^$ Y! w8 E% ?) l1 Y+ v2 I( 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
' v5 c3 n) s  ]. A) ?* H7 }我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

& s! v( [" |  c% Y谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
# w% y' }2 g. q6 T9 q" @) `0 N& H) e- v* J8 h% g* _
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。1 J) z" C8 Q( k3 p- o
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:
. }% K9 T/ C* V, {is' X8 O5 E8 I4 [5 f0 a: Y/ h$ `6 H
        xl: any;8 g2 \4 e; I1 ~  J4 `
do
# a" n( V7 G. P* G' S' i) w) ?/ U+ b        if ActiveX.active then
& o+ @0 `9 I; d8 B& e                xl:= activex.application;
1 O) a+ K# e9 l; M! W$ S                xl.call ("Macro_Reset");
  l  R, P& n: Y0 s1 D$ t                activex.active:= false;
( m7 z0 b2 t& m) C# l        end;. V  z9 T( n# Y$ ~, K* g# ^/ [
       
: p( a* R8 r  I$ a4 f1 }end;
  N: E9 u6 n8 R8 M8 G  q0 V" s! r; @5 E- Q* o
显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~
3 v! @  p3 e( C$ \" [" \- m# V& }, K- X
期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-12-15 09:55 , Processed in 0.018374 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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