[分享]批处理以文件名长度升序列示指定文件

hfxiang

以文件名长度升序列示指定文件

1. 
   
2. @echo off
   
3. rem 保存为ANSI格式
   
4. setlocal enabledelayedexpansion
   
5. set "_strlen=set $=^!#1^!#&set ##=&(for %%a in (256 128 64 32 16)do if ^!$:~%%a^!. NEQ . set/a##+=%%a&set $=^!$:~%%a^!)&set $=^!$^!fedcba9876543210&set/a##+=0x^!$:~16,1^!&set ##=  ^!##^!&set ##=^!##:~-3^!"
   
6. set /a No=0
   
7. (for /f "tokens=*" %%a in ('dir "%~1" /b/s/a-d') do (
   
8.         if "%%~fa" NEQ "%~f0" (
   
9.                 set "#1=%%~na"
   
10.                 (%_strlen%)
    
11.                 set Nl=!##!
    
12.                 set "#1=%%~fa"
    
13.                 (%_strlen%)
    
14.                 echo;!Nl!（!##!）        "%%~na"        （ "%%~fa" ）
    
15.                 set /a No+=1
    
16.         )
    
17. ))>"%~dpn0.bak"
    
18. echo;长度             文件名        （...）>"%~dpn0.txt"
    
19. sort "%~dpn0.bak">>"%~dpn0.txt"
    
20. del "%~dpn0.bak"
    
21. if %No% GEQ 1 (echo;&echo;共 %No% 个文件)>>"%~dpn0.txt"
    
22. type "%~dpn0.txt"
    
23. echo;&echo;详情见"%~dpn0.txt"
    
24. endlocal
    
25. echo;&pause
    
26. exit /b
    

复制代码

拖放目标到脚本即可。

yyz219

以文件名长度升序列示指定文件拖放目标到脚本即可。
hfxiang 发表于 2023-1-4 15:28

    感谢分享