【出题】批处理按特定条件查找文本内容

随风

a.txt

sdfgsdfgsdfg
上dfhgjs正确
abcddfja;正确
sdfg下正确
sdfgsdgs
sdfgsdgsdg
55555555555
sg上fg正确
abcd正确
sdfg下gf正确
fgfdgsdfg
77777777777
上fdg正确dsfg
abcddkfja
dfsg下dfsg正确
tuytutyuy
gfhgfh
sdghj上dfg正确
abcd正确
sdg下sdg正确
复制代码

要求一：显示a.txt中以 abcd 开头的行和它的上一行。
要求二：显示a.txt中以 abcd 开头的行和它的上一行及下一行。

[ 本帖最后由 随风 于 2008-5-24 01:35 编辑 ]

尘丶

二

@echo off&setlocal enabledelayedexpansion
setlocal enabledelayedexpansion
(for /l %%a in (1,1,30) do set/p n%%a=)<1.txt
for /f "delims=" %%a in (1.txt) do (
set num=%%a&set /a n+=1&set /a s=!n!-1&set /a k=!n!+1
if "!num:~,4!"=="abcd" (
    call,echo;上一行:%%n!s!%%
    echo;%%a
    call,echo;下一行:%%n!k!%%
  )
)
pause
复制代码

尘丶

一.

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
    echo;%%a|findstr "^abcd">nul&&(
    echo;%%a
    if not "!num!"=="" echo;!num!
    ) 
    set num=%%a
)
pause
复制代码

二

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
    if !n!==2 echo;%%a&set n=
    echo;%%a|findstr "^abcd">nul&&(
    echo;%%a&set /a n+=2
    if not "!num!"=="" echo;!num!
    ) 
    set num=%%a
)
pause
复制代码

hankerer

要求一：显示a.txt中以 abcd 开头的行和它的上一行。要求二：显示a.txt中以 abcd 开头的行和它的上一行及下 ...
more 发表于 2008-6-13 14:14

谁能解释一下这个 _!n!的用法吗？

类似于C里面的指针？

为什么只能放在call里输出

634175535

嗯丶…这个可以用到for 语句！

ccr438758900

第一题
@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in (1.txt) do (set a=%%i
if "!a:~0,4!"=="abcd" (echo !b!&echo %%i)
set b=%%i)
pause 
复制代码

第二题
@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in (1.txt) do (
if !a!==b (echo !c!&echo !d!&echo %%i&set a=)
set w=%%i&if "!w:~0,4!"=="abcd" (set a=b)
if !a!==b (set d=%%i) else (set c=%%i)
)
pause
复制代码

Seter

@echo off&setlocal enabledelayedexpansion
echo 每个上一行:
for /f "delims=:" %%i in ('findstr /n ^^abcd text.txt') do set/at=%%i-2&more +!t! text.txt>tmp&set/pt=<tmp&echo !t!
echo.&echo 每个上下行&echo.
for /f "delims=:" %%i in ('findstr /n ^^abcd text.txt') do set/at=%%i-2&more +!t! text.txt>tmp&set/pt=<tmp&echo !t!&more +%%i text.txt>tmp&set/pt=<tmp&echo !t!
del tmp&pause
复制代码

zgq0301

借鉴7楼的要求一的做法，做了要求二^^

rem 要求二：显示a.txt中以 abcd 开头的行和它的上一行及下一行
@echo off&setlocal enabledelayedexpansion
set /a i=1
for /f "delims=" %%a in (a.txt) do (
   set /a i+=1,j=i+1,k=j+1
   set  _!k!=%%a
   call set str=%%_!j!%%
    if "!str:~,4!"=="abcd" ( call echo 上一行：%%_!i!%%&call echo 此行：%%_!j!%%&call echo 下一行：%%_!k!%% )
    )
pause>nul
复制代码

[ 本帖最后由 zgq0301 于 2009-11-14 18:48 编辑 ]

lxzzr

也来一个，呵呵

 
@echo off
setlocal enabledelayedexpansion
for /f "skip=2 delims=[]" %%a in ('find /n "abcd" a.txt') do (
      set temp_=
      for /f "delims=" %%b in (a.txt) do (
           set /a temp_+=1
           set /a temp_a=!temp_!+1
           set /a temp_b=!temp_!-1
           if !temp_a! == %%a echo 上一行：%%b
           if !temp_b! == %%a echo 下一行：%%b
      )
)
pause
复制代码

fhsyj

我也刚学批处理,试着来帮楼上解释一下,如不正确还望有人能帮我指正一下,别让我误导了人家,呵呵!

setlocal enabledelayedexpansion      开启延迟变量开关
for /f "delims=" %%a in ('type a.txt') do (    获取a.txt文件中的一行给变量%%a.  "delims=" 没有分隔符就是获取整行,如果有分隔符如: "delims= " 就是遇到
                                                                 空格结束,忽略空格后的字符,'type a.txt' 应该是以查看方式打开a.txt文件,
   set /a n+=1,m=n-1     以数字表达式方式给n,m赋值,n+=1 for 语句循环一次加1.
   set _!n!=%%a        把%%a 的值传递给n ,!n! 应该是立刻刷新变量的值, _   下划线用于储藏空间，作为变量的输出 ( 只对紧跟其后的变量有效)
                                  呵呵,这 个下划线不太熟悉!!
   set str=%%a       把变量%%a 的值传递给str
   if " ...

[ 本帖最后由 fhsyj 于 2009-10-22 15:52 编辑 ]

pine

原帖由 more 于 2008-6-13 14:14 发表
要求一：显示a.txt中以 abcd 开头的行和它的上一行。@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in ('type a.txt') do (
   set /a n+=1,m=n-1
   set _!n!=%%a
   set str=%%a
   if " ...

能否讲解一下你的代码呢，有些看不懂，谢谢

keen

findstr /n "abcd" a.txt的确是找到的是所有含有abcd的行。

来个VBS的：

'直接做的要求二。要回答要求一：把代码中的"& ArrLine(i+1) & vbCrLf"去掉就行了
'没有考虑第一行和最后一行是abcd的情况
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("a.txt", 1)

AllStr = objTextFile.ReadAll
ArrLine = Split(AllStr, vbCrLf)

For i = 0 To Ubound(ArrLine)
    If Left(ArrLine(i), 4) = "abcd" Then
        newStr = newStr & ArrLine(i-1) & vbCrLf & ArrLine(i) & vbCrLf & ArrLine(i+1) & vbCrLf
    End If
Next
WSH.Echo newStr
复制代码

[ 本帖最后由 keen 于 2009-10-13 15:54 编辑 ]

sjzong

9楼：disuo兄的代码，的确厉害用一个for就可以实现了！！佩服！其中代码中的第7行中的“!a1”，应该改为“!a1!”。
14楼：keen兄的思路还是值得学习的，但是这个代码中的 findstr /n "abcd" a.txt' 显示的是a.txt所有还有abcd的行，跟本题题意以abcd开头有点偏差了！！

[ 本帖最后由 sjzong 于 2009-5-2 17:40 编辑 ]

sjzong

我的思路跟 more 一样的，只是增加判断第一行就含有abcd时，就没有上一行；判断最后一行含有abcd时，就没有下一行。还有个前提a.txt中不能有空行的，否则就跑题了。
要求一：

@echo off
setlocal enabledelayedexpansion
set/a m=0
for /f %%a in (a.txt) do (
set/a n=!m!
set/a m+=1
set t!m!=%%a
set str=%%a
if "!str:~0,4!"=="abcd" (
if !n!==0 (call echo 上  一  行：没有上一行) else (call echo 上  一  行：%%t!n!%%)
echo abcd开头行：%%a
echo.))
pause
复制代码

要求二：

@echo off
setlocal enabledelayedexpansion
set/a m=0
for /f %%a in (a.txt) do (set/a m+=1&set t!m!=%%a)
for /l %%b in (1 1 !m!) do (
set/a a=%%b-1&set/a b=%%b+1
call set str=!t%%b!
if "!str:~0,4!"=="abcd" (
  if !a!==0 (call echo 上  一  行：没有上一行) else (call echo 上  一  行：%%t!a!%%)
  call echo abcd开头行：%%t%%b%%
  if !b! gtr !m! (call echo 下  一  行：没有下一行) else (call echo 下  一  行：%%t!b!%%)
  echo.))
pause
复制代码

[ 本帖最后由 sjzong 于 2009-5-2 16:49 编辑 ]

cainiao736

要求一

@echo off&setlocal enabledelayedexpansion
for /f %%i in (a.txt) do (
echo %%i|findstr "abcd">nul&&echo %%i &&echo !m!
set m=%%i )
pause
复制代码

考虑到a文本中只要有abcd，都是位于开头部分，所以没有进行判断。只要存在abcd字符串即符合条件。
要求二

@echo off&setlocal enabledelayedexpansion
set n=0
for /f %%i in (test.txt) do (
if !n!==1 ( echo %%i&set n=0 )
echo %%i|findstr "abcd">nul&&echo %%i&&echo !m!&&set n=1
set m=%%i )
pause
复制代码