[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 请问此批量删除txt档中的连续行的BAT代码有何问题?

代码如下, 运行后无效也无错误提示, 不知是如原因.
  1. @ECHO OFF
  2. SET TxtDir="%~dp0"
  3. echo.&set /p  A=Please type in the start row No. what do you need to delete:
  4. echo.&set /p  B=Please type in the end row No. what do you need to delete:
  5. ECHO Running~~~~waitting....
  6. ECHO Running~~~~do not close me!
  7. CD /D %TxtDir%
  8. FOR /F "tokens=%A% delims=" %%I IN ('DIR /A /B *.txt') DO ((MORE +%B% "%%I">"%%I_")&(DEL /A /F /Q "%%I")&(REN "%%I_" "%%I"))
  9. ECHO Good Job*_*
  10. PAUSE
复制代码

求各位坛友帮忙... 谢谢

TOP

比如要删除各个文档中的第5~10行,未测试:
  1. @echo off
  2. set linenum1=5
  3. set linenum2=10
  4. setlocal enabledelayedexpansion
  5. for /f "delims=" %%i in ('dir /b /a-d *.txt') do (
  6.     set n=0
  7.     (for /f "delims=" %%a in ('type "%%i"') do (
  8.         set /a n+=1
  9.         if !n! lss %linenum1% echo,%%a
  10.         if !n! gtr %linenum2% echo,%%a
  11.     ))>new_%%i
  12.     move "new_%%i" "%%i"
  13. )
  14. pause
复制代码

TOP

回复 3# qixiaobin0715


    多谢你的回答, 我的本意是这个批文件运行时, 会要求输入起始行号和终止行号, 这样可以适应不同的要求. 省得反复修改批文件.

TOP

回复 4# xinghua_wei
修改第2,3行,就你顶楼提供的参考代码一样:用set /p。
1

评分人数

TOP

回复 5# qixiaobin0715


    谢谢, 我试了下, 没有问题,效果很好.
    请教一下, tokens=%A%  这种写法是不是有问题的, tokens后面不面不能指定变量吗?

TOP

tokens=%A%有点尴尬,不知有什么用。代码错误较多,有些不知所云,多看看for教程。

TOP

返回列表