批处理生成当前目录根路径下文件名称列表

@echo off
setlocal enabledelayedexpansion
echo 生成的文件名为"文件名列表.txt"保存在程序目录中
set name=
for /f "tokens=* delims=" %%n in ('dir /b %0') do (
set name=%%n
)
set idx=1
for /f "tokens=* delims=" %%i in ('dir /b /a-d /one') do (
if "%%i" neq "!name!" (
if "%%i" neq "文件名列表.txt" (
if !idx! equ 1 (
echo %%i>文件名列表.txt
) else (
echo %%i>>文件名列表.txt
)
set /a idx+=1
) 
)
)
echo 生成完毕！
pause
exit