中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-11 02:40
47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行
DOS批处理 & 脚本技术(批处理室) » 逐行读取文本内容脚本
可打印版本  1,130 / 4
第1楼 175891641 发表于 2008-12-28 16:12
初级用户 发帖 30 积分 82
逐行读取文本内容脚本
findstr /v /i /n "fff" 视频网址.txt >>2.txt

rem 读取上次转换第几行
for /F "tokens=1* delims=:" %%a in ('type nowdownload.ini') do set nowdownload=%%a
for /f "tokens=1* delims=:" %%a in (2.txt) do SET MAXURL=%%a

if %MAXURL% LSS %nowdownload% goto :finish

if %nowdownload% LSS 10 goto :small

rem 提取指定行
findstr /i "%nowdownload%:" 2.txt >>b.txt
set /a nowdownload=%nowdownload%+1
echo %nowdownload% >nowdownload.ini
for /F "tokens=1* delims= " %%a in ('type nowdownload.ini') do echo %%a>nowdownload.ini
rem 去除行号
for /F "tokens=1* delims=:" %%a in ('type b.txt') do echo %%b>当前处理网址.txt
goto :end

:small
rem 去处10行以下的文本
for /f "tokens=1* delims=:" %%a in (2.txt) do if %%a LSS 10 echo %%a:%%b>>a.txt
rem 提取指定行
findstr /i "%nowdownload%:" a.txt >>3.txt
set /a nowdownload=%nowdownload%+1
echo %nowdownload% >nowdownload.ini
for /F "tokens=1* delims= " %%a in ('type nowdownload.ini') do echo %%a>nowdownload.ini
rem 去除行号
for /F "tokens=1* delims=:" %%a in ('type 3.txt') do echo %%b>当前处理网址.txt

:end
del 1.txt
del 2.txt
del 3.txt
del a.txt
del b.txt
exit

:finish
echo 0 >nowdownload.ini
for /F "tokens=1* delims= " %%a in ('type nowdownload.ini') do echo %%a>nowdownload.ini
del 1.txt
del 2.txt
----------------------------------------------
nowdownload.ini里保存当前的行数
支持1-99行 自己写的脚本
第2楼 kang2008 发表于 2008-12-28 18:02
初级用户 发帖 14 积分 28
如果在MS DOS7.1的环境下,以上的代码无法运行的, 因不支持 for /参数啊, 很的启动盘启动后进入的DOS多是MS DOS7.10的版本
第3楼 kang2008 发表于 2008-12-28 18:03
初级用户 发帖 14 积分 28
如何计算一个文本文件有多少行,并把这个值给一个变量呢???????????
第4楼 ily2013 发表于 2008-12-28 20:07
中级用户 发帖 83 积分 247
Originally posted by kang2008 at 2008-12-28 18:03:
如何计算一个文本文件有多少行,并把这个值给一个变量呢???????????

for /f "tokens=3 delims= " %i in ('find /v /c "" test.txt') do set num=%i
第5楼 HAT 发表于 2008-12-28 20:33
版主 发帖 5,017 积分 9,023
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023