千秋雪 发表于 2017-11-22 19:41:47

请问删除文件夹怎么搞

(defun c:tt ()
(setq path (vl-string-right-trim "d:\\Acad" path))
(setq FSO (vlax-create-object "scripting.FileSystemObject"))
(vlax-invoke FSO 'DeleteFolder path :VLAX-TRUE)
(vlax-release-object FSO)
(princ)
)

xujinhua 发表于 2018-7-18 12:55:00

顶上去,我也想找这个

土木燃 发表于 2018-7-19 08:15:34

正需要,顶一下,谢谢

liyamg 发表于 2021-8-3 08:30:43

这个好用,不会蹦出来 cmd的 黑色窗口

下面的不好
(command "SHELL" "RMDIR DIRNAME")
原贴 Z版的答复
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=113741&highlight=%C9%BE%B3%FD%CE%C4%BC%FE%BC%D0

tigcat 发表于 2021-8-3 09:00:11

liyamg 发表于 2021-8-3 08:30
这个好用,不会蹦出来 cmd的 黑色窗口

下面的不好


这个是好还是不好呢?Z版这个是蹦出来黑色窗口?

520kim 发表于 2023-10-4 23:25:41

本帖最后由 520kim 于 2023-10-4 23:27 编辑



(defun c:tt ()
(setq path (vl-string-right-trim "d:\\Acad" path))
(setq FSO (vlax-create-object "scripting.FileSystemObject"))
(vlax-invoke FSO 'DeleteFolder path :VLAX-TRUE)
(vlax-release-object FSO)
(princ)
)



用上面的程序:
参数类型错误: (or stringp symbolp): nil   2014版出现错误是什么问题 ,如何解决,请高手指点
页: [1]
查看完整版本: 请问删除文件夹怎么搞