- 353 名前：名無しさん＠お腹いっぱい。 mailto:sage [2008/12/14(日) 03:14:41 ID: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
)
