我在 Windows 10 中有一个文件夹,里面有很多子文件夹。其中也有很多文件,但没有其他文件夹。有些文件夹只包含 2 或 3 个文件,所以我希望有一种方法可以删除包含 4 个或更少文件的文件夹。有办法吗?
答案1
所以我用 vbs 为你写了这个脚本,因为我在工作中很无聊。你所要做的就是创建一个新的文本文件,复制粘贴脚本,将最后一行的路径替换为你希望它应用的文件夹的路径,用 .vbs 扩展名保存文本文件。
Set fs = WScript.CreateObject ("Scripting.FileSystemObject")
Sub ShowSubFolders(Folder)
For Each SubFolder In Folder.SubFolders
set objFolder = fs.GetFolder(SubFolder)
Set files = SubFolder.Files
ShowSubFolders Subfolder
if files.Count < 4 And objFolder.SubFolders.Count = 0 then
fs.DeleteFolder Subfolder
end if
Next
end sub
ShowSubFolders fs.GetFolder("C:\your\folder\path\here")
附言:我没有花太多时间测试它,但它应该可以工作。只需先创建一个备份,然后在运行后将其与备份进行比较。我不希望你丢失任何重要文件。