如何删除具有一定数量文件的文件夹？

所以我在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")

PS：我没有花太多时间测试它，但是它应该可以工作。只需先创建一个备份，然后运行，然后将其与备份进行比较。我不希望您丢失任何重要文件。