列出文件名过长的 WinXP 文件

【问题标题】：List WinXP Files with Too Long Filenames列出文件名过长的 WinXP 文件
【发布时间】：2012-05-22 10:23:20
【问题描述】：

您能否推荐一种方法来列出 WinXP 磁盘上总文件名（驱动器+文件夹+子文件夹+文件名+ext）大于某个值或 MAX_PATH 的文件？理想情况下，这将是批处理或 VB 脚本。提前致谢。

【问题讨论】：

【解决方案1】：

@echo off
setlocal
if "%~1%~2"=="%~2%~1" (
    echo Usage: drive maxlength
    echo Example: %0 d: 200
    goto :EOF
)
for /F %%A in ('dir /S/B/A:-D "%~d1\*" 2^>nul') do call :chkpath "%%~A" %2
goto :EOF
:chkpath
set #=%~1%
set len=0
:longer
if defined # (set "#=%#:~1%"&set /A len += 1&goto longer)
if %len% GTR %2 echo.%~1
goto :EOF

我想 Windows 脚本主机会更快...

【讨论】：