本帖最后由 Blitz 于 2016-11-29 22:30 编辑
回复 3# CommandBatCmd - @echo off
- set /p as=请输入网址:
- cd C:\Users\Administrator\Desktop
- wget -O 1.txt %as%
- HtoX32c /IP 1.txt>2.txt
- del 1.txt
-
- setlocal Enabledelayedexpansion //从这里往下是从网上找的,作用是取章节的标题作为文件名
- call :G_getrowstr 18 2.txt kk
- ren 2.txt "%kk%.txt"
- exit
- :G_getrowstr
- set %3=
- set /A G_skiprows=%1-1
- if "%G_skiprows%"=="0" goto :G_getrowstrz
- for /f "skip=%G_skiprows% delims=" %%i in ('findstr /n .* %2') do (
- for /f "tokens=2* delims=:" %%j in ("%%i") do set %3=%%j
- ::if "%%i"=="%1:" set %3=空白行
- goto :eof
- )
- :G_getrowstrz
- for /f "delims=" %%i in ('findstr /n .* %2') do (
- for /f "tokens=2* delims=:" %%j in ("%%i") do set %3=%%j
- goto :eof
- )
复制代码 这就是要输入最新章节的地址才行 |