Title --告别繁琐的命令--管理员权限运行我！ 制作人：KHMSOFT(我本疯狂)
@echo off
cls
color 9f
PUSHD %~dp0
setlocal enabledelayedexpansion
:: 判断输入路径是不是文件夹，如果是，则获取文件夹下的所有文件名(包括子文件夹下的)
:: 如果要文件名带上路径，则需要在dir这一句的%%~nxi上作改动
if exist list.txt del list.txt /q
:input
cls
set input=:
set /p input= 请输入要进行判断的路径：
set "input=%input:"=%"
:: 上面这句为判断%input%中是否存在引号，有则剔除。
if "%input%"==":" goto input
if not exist "%input%" goto input
for %%i in ("%input%") do if /i "%%~di"==%%i goto input
pushd %cd%
cd /d "%input%">nul 2>nul || exit
set cur_dir=%cd%
popd
for /f "delims=" %%i in ('dir /b /a-d /s "%input%"') do echo %input%\%%~nxi>>list.txt
if not exist list.txt goto no_file
start list.txt
exit
:no_file
cls
echo %cur_dir% 文件夹下没有单独的文件
pause
希望大家找到列表文件后有兴趣的朋友再补一个将列表文件转换为检索全盘拷贝文件到其它位置的批处理来实现回写功能
有会的写个发发上来！！！！！！作者: freesoft00 时间: 2013-4-1 11:36
批处理不好实现的，pecmd是否可以？作者: freesoft00 时间: 2013-4-1 14:14
md d:\winpelist
for /f "delims=" %%a in (list.txt) do copy /y "%%a" d:\winpelist
不知道copy是否可以胜任作者: 1e3e 时间: 2013-4-1 15:23
谢谢你的分享呀，真的很有用