请教关于em-Plant做client的DDEExecute的应用

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
6 n7 U6 f0 b7 x" ikanal:= DDEConnect("Excel", "Cost");
9 Z4 i* ]$ V4 u# c* O& W5 kDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
  [0 n2 \% N1 bDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
! H6 {) I1 j9 v) P: lDDEDisconnect(kanal);
7 {8 |: c4 y1 f& F1 g系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。

* g% H" g' t9 v请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

5 Q! i$ q7 Q4 x木有人理我么？
- S. C( k" \6 s" W/ t9 E4 m7 L, g* U
" S) `* @0 s* n6 P6 J- T我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
" K& r; B1 O! u+ z  ?0 Y
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);

" E! m( g3 R" f3 q' {! v但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。
1 M6 a& u) s/ G/ K& Q% @
触发语句是这样写的execute("        'cost'   ...

谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

: f! ?3 ^  K" S; o

taoyifei2000 发表于 2012-3-29 21:37
3 i' r! {4 j2 e7 W# Tdde确实没用过，不过之前用过其它接口，不知道有没有共性。

触发语句是这样写的execute("        'cost'   ...

) z% Q+ E& N: n4 S2 t% ]8 T8 f
不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。

诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五

: }* _. D3 w5 d2 v4 r. s

若叶繁茂 发表于 2012-3-29 22:03
  @) T" [( Z+ N# d: W1 C不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

! B# N, g- g* Q0 ^2 j$ W2 A( X+ N0 T
% O" P, d$ k8 @" a6 ^! E0 H: ~# T) X我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

还有我按照你的语句写了一下 电脑并不沉默 但是只是单纯的把 Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value 这一段内容作为字串赋值到excel里面了 囧。。。不知道为啥。。。

若叶繁茂

五五 发表于 2012-3-29 23:13
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
  \; u9 ?" f# m( m3 x9 m8 a/ w- v
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
3 p5 m1 L% N. ^% [) E0 y4 N按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
4 `) z' N# e4 m% J- h  B% N% Gis
4 Q' Y& B* h4 U$ e; S9 g        xl: any;
, l! q# f# Q0 O) B; o; ]( V) Zdo
5 A, f/ J  B  ^4 w% t' T        if ActiveX.active then
& o+ k$ U) K) _! Q                xl:= activex.application;
% f1 O, ]0 t+ U! A                xl.call ("Macro_Reset");
2 Z4 q$ P8 J% ?3 s4 l$ P" S                activex.active:= false;
: q5 z+ X) n% \2 `. H4 u        end;
3 x. g9 `8 A- u       
end;

. \4 h# k& Q6 U; u显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
) z% a$ @( y8 u/ w( N# s9 W8 T
期待你的恢复~~