[文本处理] 【已解决】批处理如何给文件夹名称后添加里面所有文件的数量？

wzf1024

有很多文件夹，需要在文件夹名称后面加上该文件夹下文件的数量，文件夹位置不变，如文件夹1下有子文件夹2和3及一个文件，子文件夹2下有两个文件，子文件夹3下有3个文件，操作后为：
文件夹1-6
文件夹2-2
文件夹3-3
……
哪位大侠帮忙，我是菜鸟啥都不懂

bailong360

//&cls&@cscript -nologo -e:jscript "%~f0"&exit
var FSO  = new ActiveXObject('Scripting.FileSystemObject');
var Folder = new Enumerator(FSO.GetFolder(FSO.GetFile(WScript.ScriptFullName).ParentFolder.Path).SubFolders);
while (!Folder.atEnd()) {
    FileCount(Folder.item());
    Folder.moveNext();
}

function FileCount(FolderName) {
    var n = 0;
    var Folder_ = FSO.GetFolder(FolderName);
    var Files = new Enumerator(Folder_.Files);
    while (!Files.atEnd()) {
        n += 1;
        Files.moveNext();
    }
    Folder_.Name = Folder_.Name + '-' + n;
}
复制代码

练手

happy886rr

回复 1# wzf1024
论坛里教程太多了，对于这些简单问题。稍微学学就能自己解决的。

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /ad /b /s^|sort /r') do (
	set j=0
	for /f "delims=" %%b in ('CD "%%a" ^& dir /a-d /b /s 2^>nul') do (set /a j+=1)
	ren "%%a" "%%~na-!j!"
)
echo 执行完毕！
pause>nul
复制代码