ivor

删除所有*.txt 第一行

@echo off & setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /s /b *.txt') do (
	set indicator=nul
	for /f "useback delims=" %%b in ("%%a") do (
		echo %%b
		set indicator=%%a~
		
	)>>"!indicator!"
	move "%%a~" "%%a"
)
pauseCOPY

再附上多功能版，列数如果大于4请修改:delCols代码块
功能1.指定删除的行数 2.指定删除的列数 3.同时指定行数和列数

@echo off & setlocal enabledelayedexpansion
 
set /p rows=请输入要删除的行:
set /p cols=请输入要删除的列:
 
if defined rows call :delRows %rows% & pause
if defined cols call :delCols %cols% & pause
 
 goto :eof 
:delRows
 
for /f "delims=" %%a in ('dir /s /b *.txt') do (
        set count = %1
        for /f "useback delims=" %%b in ("%%a") do (
                set /a count += 1
                if !count! neq %1 echo %%b >>"%%a~"
        )
        move "%%a~" "%%a"
)
echo 已经处理完了行数
goto :eof
 
:delCols
for /f "delims=" %%a in ('dir /s /b *.txt') do (
        for /f "useback tokens=1-4" %%b in ("%%a") do (
                        set 1=%%b
                        set 2=%%c
                        set 3=%%d
                        set 4=%%e
                        set "%1="
                        echo !1!        !2!        !3!        !4! >>"%%a~"
                        
 
        )
        move "%%a~" "%%a"
)
echo 已经处理完了列数
goto :eofCOPY

ivor

回复 4# wh1234567


    请说明具体问题

ivor

回复 6# wh1234567


   sorry to that....问题有些路径含有空格。在我win7下没试出来，因为桌面路径没有空格。
问题已修复

ivor

回复 12# wh1234567


    请问你是楼主吗？如果添加确认功能，势必会很繁琐的

ivor

回复  ivor


    你的第二段代码似乎没有删除行的功能呢？
我测试了好些次，都只能删除列，不能删除行 ...
hacker85 发表于 2012-2-5 16:55

    我测试好用啊,删除指定行可以，指定列也没啥问题啊，你哪运行的环境是什么情况。那个echo去掉了，没有多大实际意义。

ivor

不知道丫