[求助]：请版主和众位高手看看有相当的难度！！

WHGF · 发表于 2005-12-22 13:32:37

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

我的Lisp程序有如下几行：
  （Lisp 一行）
  （Lisp 二行）

（Command "Shell" " DOS命令"）第7行
（Lisp 第8行）

  ：  ：

我的问题是在程序运行到第 7  行后执行DOS命令，可是在DOS命令没有执行完后就继续运行后序的第 8  行Lisp程序，至使产生不正确的运行结果。请问，如何保证程序能按先后顺序执行。

Underway · 发表于 2005-12-22 14:05:39

（Command "Shell" " DOS命令"）第7行
(while (not (Endof第7行) ) ;; waiting .......
（Lisp 第9行）

WHGF · 发表于 2005-12-22 14:24:44

楼上，能说的详细点吗？关键是(while (not (Endof第7行) ) ;; waiting....中的(Endof第7行) 不清楚

Underway · 发表于 2005-12-22 15:20:41

等待您的上列返回结果

WHGF · 发表于 2005-12-22 15:22:49

如何获得DOS命令返回的代码？

Underway · 发表于 2005-12-22 19:32:44

且说说您第7列执行了什么?

zhang8755 · 发表于 2005-12-22 21:10:06

改用 (startapp appcmd [file]) 试试
应该可以达到你的要求了

jiechuwang · 发表于 2005-12-22 22:15:34

我也想知道，看看大家的思路

WHGF · 发表于 2005-12-23 07:45:41

第7行是DOS下的执行程序，运行比较耗时。后序各行应等待它结束后才可运行。
按斑主的方法试试

Underway · 发表于 2005-12-23 08:12:24

If you have DosLib
(dos_exewait (strcat "Notepad.exe " fname) 4)

or Ref acet-sys-wait

WHGF · 发表于 2005-12-23 14:23:44

To Underway
那里有DosLib呀？里否DOSLIB可以在所有版本的CAD中使用？

Underway · 发表于 2005-12-23 16:06:50

http://www.mcneel.com/doslib.htm

aeo · 发表于 2005-12-24 22:47:43

本论坛有,而且是lisp的.找找

WHGF · 发表于 2005-12-26 08:09:26

10楼的方法可用，好使，可用于14到2006版！但需要DOSLIB，谢谢 Underway

aec斑竹我在坛子里没找到

wujimmy · 发表于 2005-12-26 10:44:22

假设dos命今执行完后会产生一个文件
在while中检查这个文件是否存在就可以了

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：请版主和众位高手看看有相当的难度！！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子