批处理无法删除文件？ - 中国DOS联盟论坛

文件总行数_删除文件.bat

@echo off

:: 备份用注册表定位“我的文档”"%MDpath%"相对路径，适应每台机器。
for /f "tokens=2*" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" ^| findstr "Personal"') do set MDpath=%%b

:: 创建“我的文档\Dirlist”目录_"%MDpath%\Dirlist\"
if not exist "%MDpath%\Dirlist\" MD "%MDpath%\Dirlist"

:: 写入文件
echo hao>"%MDpath%\Dirlist\1女孩.mp5
echo hao>>"%MDpath%\Dirlist\女孩2.mp5

echo %MDpath%\Dirlist\1女孩.mp5>"%MDpath%\Dirlist\hao.txt"
echo %MDpath%\Dirlist\女孩2.mp5>>"%MDpath%\Dirlist\hao.txt"

@echo off
:: 累计文件总行数
for /f "tokens=1 delims=:" %%i in ('findstr /n .* "%MDpath%\Dirlist\hao.txt"') do set m=%%i
echo 总数为：%m%

:: 打开文件
start notepad "%MDpath%\Dirlist\hao.txt"

:: 删除文件
for /f "skip=1 delims=" %%a in ("%MDpath%\Dirlist\hao.txt") do del /a /f /q "%%a"&echo 删除文件 pause

pause

第1楼　dosz	发表于 2009-05-10 11:10
中级用户　发帖 188　积分 396　来自上海
[求助]批处理无法删除文件？文件总行数_删除文件.bat @echo off :: 备份用注册表定位“我的文档”"%MDpath%"相对路径，适应每台机器。 for /f "tokens=2" %%a in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" ^\| findstr "Personal"') do set MDpath=%%b :: 创建“我的文档\Dirlist”目录_"%MDpath%\Dirlist\" if not exist "%MDpath%\Dirlist\" MD "%MDpath%\Dirlist" :: 写入文件 echo hao>"%MDpath%\Dirlist\1女孩.mp5 echo hao>>"%MDpath%\Dirlist\女孩2.mp5 echo %MDpath%\Dirlist\1女孩.mp5>"%MDpath%\Dirlist\hao.txt" echo %MDpath%\Dirlist\女孩2.mp5>>"%MDpath%\Dirlist\hao.txt" @echo off :: 累计文件总行数 for /f "tokens=1 delims=:" %%i in ('findstr /n . "%MDpath%\Dirlist\hao.txt"') do set m=%%i echo 总数为：%m% :: 打开文件 start notepad "%MDpath%\Dirlist\hao.txt" :: 删除文件 for /f "skip=1 delims=" %%a in ("%MDpath%\Dirlist\hao.txt") do del /a /f /q "%%a"&echo 删除文件 pause pause

第2楼　dosz	发表于 2009-05-10 11:17
中级用户　发帖 188　积分 396　来自上海
:: 此代码无法删除文件？ for /f "skip=1 delims=" %%a in ("%MDpath%\Dirlist\hao.txt") do del /a /f /q "%%a"&

第3楼　dosz	发表于 2009-05-10 11:19
中级用户　发帖 188　积分 396　来自上海
for /f "skip=1 delims=" %%a in (%temp%\%sheet%.txt) do del /f /a "%%a" rem 此代码可删除文件!