中国DOS联盟

一个文件夹下面有一组文本文件如下：
ABC123.txt
EDF653.txt
……

文件ABC123.txt的内容如下(文本内容都是每隔3行一个空行)：

Famous:574d-40b3-9d66-ee4fd5fba076-9d66
appendix:ISA10889001
RamAddress: GreenRoad_1002_25

Code: 2f5d3422-cb55-1059-b446-00 version 1.2
appendix:ISA10886678
location:

Code: 2f5f6521-cb55-1059-b446-00 version 1.2
appendix:ISA99886678
location:

……

文件EDF653.txt的内容如下：
Code: 2f5f6521-cb55-1059-b446-00 version 1.2
appendix:ISA99886678
location:

Code: 2f5f6521-cb55-1059-b446-00 version 1.2
appendix:ISA10886678
location:

Famous:124d-30b3-9dGG-ee4sdffba076-9d66
appendix:ISA10889001
unicode1: Jone_brandim_base64

……

在这组文件里面，每个文件内容都是每3行一个段落，然后隔一个空行。有的文件中含有以"Famous:"字符串开头的段落，"Famous:"所在段落在文本文件中出现
的位置是不固定的。而有的文件中没有"Famous:"字符串。

每个文件中"Famous:"字符串所在段落的第三行末尾的中括号里面的字符串是不一样的。如文件ABC123.txt里面，"Famous:"所在段落第三行末尾中括号里的字符串是Washington；文件EDF653.txt里面，"Famous:"所在段落第三行末尾中括号里的字符串是Encode。

批处理要实现的功能是：

1、查找出含有"Famous:"字符串的文本文件；

2、从含有"Famous:"字符串的文件里面，读取出以"Famous:"字符串开头的段落的第三行末尾中括号里的字符串； 然后把该字符所在的文件的文件名，连同该字符串一起写入到一个txt文件中。


最后的txt文件的内容如下：

ABC123 Washington
EDF653 Encode
……

如何用批处理实现？请各路侠客出招赐教！

Last edited by HAT on 2008-12-9 at 12:30 ]

这个用批处理来实现应该不难。
不知你是完全不会，等着别人给完整代码呢？还是自己尝试编写过程中遇到具体困难，需要他人指点呢？

本菜鸟刚刚涉足批处理，能看懂基本的代码。但自己动手写这个，不知从何下手。但求高人指点迷津！先谢过！

@echo off

setlocal enabledelayedexpansion

for /f "delims=" %%a in ('findstr /m "Famous:" *.txt') do (

  for /f "tokens=1 delims=:" %%b in ('findstr /n "Famous:" "%%a"') do (

    set /a rowSkip=%%b+1

    call :print !rowSkip! %%a

  )

)

pause

goto :eof

:print

for /f "skip=%1 tokens=2 delims=" %%c in (%2) do (

  echo %~n2 %%c

  goto :eof

)

非常经典，真乃超一流高手，感谢HAT斑竹！本菜鸟要多加学习！

此致！
敬礼！

本菜鸟愚钝，还有不明之处，望加以指点：

1、set /a rowSkip=%%b+1 是定位到该段落的第三行吗？

2、call :print !rowSkip! %%a 后面的两个参数分别传递到哪里了？

3、%~n2 为什么能够显示文件名呢？