duotu007 发表于 2012-2-24 11:27:06

求助,如何删除文件到回收站?

;;;删目录
(defun del_folder ( path / fso )
(setq path (vl-string-right-trim "\\" path))
(setq fso (vlax-create-object "Scripting.FileSystemObject"))
(vlax-invoke FSO'DeleteFolder path :VLAX-TRUE)
(vlax-release-object fso)
)
这种方法直接删除了,并不放到回收站。

逍遥无声 发表于 2020-5-23 12:48:47

逍遥无声 发表于 2020-5-23 12:49:17

刚好我要这种,谢谢

烟盒迷唇 发表于 2022-3-12 10:39:13

目录内有文件还在使用是不是就会删除失败

mokson 发表于 2022-3-12 11:02:00

所谓删除到回收站,就是移动到回收站。你用 fso 的移动目录试试。
回收站的目录是:C:\\$RECYCLE.BIN\S-1-5-21-1558060861-2044350480-790342636-500

1291500406 发表于 2022-3-12 21:11:27

shell - AutoLISP/Visual LISP 编程技术 - CAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)
页: [1]
查看完整版本: 求助,如何删除文件到回收站?