08/12/14 03:14:41 W5W4iiaK0
:カレントフォルダとサブフォルダのdatの指定の行（レス番）を
:抜き出してlist.txtに書き込むだけのバッチ
@echo off
setlocal enableextensions enabledelayedexpansion
set /p resban=レスは何番？
set /a skp=%resban%-1
echo.レス番：%resban%>list.txt
for /F "delims=" %%i in ('dir /b/s *.dat') do (
set res=
for /F "skip=%skp% delims=" %%j in (%%i) do (
if "!res!"=="" ( set res=%%j )
)
echo.%%~ni>>list.txt
echo.!res!>>list.txt
)