明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2878|回复: 13

怎样删除文件?

    [复制链接]
发表于 2006-7-10 18:08:00 | 显示全部楼层 |阅读模式
本帖最后由 作者 于 2006-7-10 18:36:13 编辑

下面一个例子:

  (command "script" "c:/abcd.scr")            
  (vl-file-delete "c:/abcd.scr")

执行结果,文件"c:/abcd.scr"没有被删除, 但手工输入单独 输入(vl-file-delete "c:/abcd.scr") 能够删除文件。

这是由于程序并不是完全按照程序顺序执行的,执行(vl-file-delete "c:/abcd.scr") 时 (command "script" "c:/abcd.scr")  并没有完成,故删除失败。

请问高手,怎样才能解决此问题?

我又在(vl-file-delete "c:/abcd.scr") 前增加了20次(dos_pause 1)延时20s(其延时期间带显示),结果表明先执行延时,然后才执行(command "script" "c:/abcd.scr")的具体处理任务。           

"觉得好,就打赏"
还没有人打赏,支持一下
发表于 2011-11-30 18:46:15 | 显示全部楼层
...难道不可以用通配符么?...

可援用古老的 Dos 命令
(command "Shell" "Del E:\\path1\\path2\\*.bak")

评分

参与人数 1明经币 +1 收起 理由
zzl9105 + 1 成分感谢!

查看全部评分

回复 支持 1 反对 0

使用道具 举报

发表于 2018-7-18 12:52:42 | 显示全部楼层
Andyhon 发表于 2011-11-30 18:46
...难道不可以用通配符么?...

可援用古老的 Dos 命令

谢谢你,学到东西了
发表于 2006-7-10 23:09:00 | 显示全部楼层

LISP执行SCR后无法返回!

发表于 2006-7-11 08:10:00 | 显示全部楼层

我也想知道执行完SCR文件后,要怎么样将文件删除.............

发表于 2006-7-11 21:42:00 | 显示全部楼层

为什么一定要删除?把它放在temp目录里,它只是一个很小的文件,再用随时可以覆盖

 楼主| 发表于 2006-7-12 08:16:00 | 显示全部楼层

事实上,我想用于批量处理程序,但经过处理的dwg文件都要产生一个bak文件,我最需要的是删除这些bak文件。

发表于 2006-7-12 08:39:00 | 显示全部楼层
这样用不了这么麻烦哦, 有个系统变量是控制生不生成BAK文件的 isavebak
 楼主| 发表于 2006-7-12 11:32:00 | 显示全部楼层

谢谢!

发表于 2011-11-11 18:01:29 | 显示全部楼层
我也想知道如何删除?怎么写,
(vl-file-delete "E:\mydrawing\2011\河源会所\*.bak")
我这句,也没删成功

发表于 2011-11-11 18:47:57 | 显示全部楼层
(vl-file-delete "E:\mydrawing\2011\河源会所\*.bak")
===>
(vl-file-delete "E:/mydrawing/2011/河源会所/*.bak")
因含中文路径得实测能否成功
发表于 2011-11-30 16:00:27 | 显示全部楼层
本帖最后由 zzl9105 于 2011-11-30 16:19 编辑
Andyhon 发表于 2011-11-11 18:47
(vl-file-delete "E:\mydrawing\2011\河源会所\*.bak")
===>
(vl-file-delete "E:/mydrawing/2011/河源会 ...


直接把*.bak文件,放到e盘根目录下,也还是不行呀?
(vl-file-delete "E:\*.bak")
(vl-file-delete "E:/*.bak")
带具体的文件名,可以,用通配符的名字,不可以么?难道不可以用通配符么?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-5-19 15:26 , Processed in 0.206723 second(s), 29 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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