wujianfu 发表于 2010-4-23 21:54:48

如何判断回收站是否为空?(已解决)

本帖最后由 wujianfu 于 2010-4-24 19:19 编辑

Dim $r=FileRecycleEmpty()
If $r=1 Then
        MsgBox(64,"结果","清空回收站成功!","2")
ElseIf $r=0 Then
        MsgBox(16,"结果","清空回收站失败!","2")
EndIf        如上所示,如果清空回收站的过程中出现错误就会显示失败信息,但问题是如果回收站本来就为空的话同样也会显示失败,
所以我想在清空回收站之前先判断回收站是否为空,请问怎么做啊?

l4ever 发表于 2010-4-23 23:17:35

1.你不要elseif $r=0 直接FileRecycleEmpty() 后面判断不要了.
2.NTFS的话,DirRemove("C:\$RECYCLE.BIN\",1),能删除回收站的文件,但是桌面上的图标不会变.
打开一次回收站就变成空的了.

menfan1 发表于 2010-4-24 08:06:45

呵呵,学习一下。。

lxz 发表于 2010-4-24 08:26:32

学习一下。。

3mile 发表于 2010-4-24 13:20:32

#Include <WinAPIEx.au3>
#include <array.au3>
$recycle=_WinAPI_ShellQueryRecycleBin("")
If $recycle>0 Then
        MsgBox(4096,0,"回收站内有"&$recycle&"个文件")
        FileRecycleEmpty()
        MsgBox(0,0,"回收站已清空")
Else
        MsgBox(0,0,"回收站无数据,无需清空")
EndIf

myloveqmx 发表于 2010-4-24 13:25:00

NT6系列回收站是$RECYCLE.BIN
NT5系列的Recycler

wujianfu 发表于 2010-4-24 17:26:11

回复 5# 3mile

太感谢了 原来有api调用的。

lanfengc 发表于 2010-4-24 18:31:35

GOOD! 学了一招。

dajun 发表于 2010-5-9 18:56:39

GOOD!
GOOD!

热咖啡里的冰 发表于 2010-5-9 23:01:29

学习一下。。

拉风晓晓 发表于 2010-5-10 07:22:29

以后用,谢谢

smooth 发表于 2015-3-10 22:10:45

正好用到,谢谢分享。
页: [1]
查看完整版本: 如何判断回收站是否为空?(已解决)