Board logo

标题: [文本处理] 批处理如何批量提取文本里百度网盘链接? [打印本页]

作者: qlit    时间: 2023-11-17 12:48     标题: 批处理如何批量提取文本里百度网盘链接?

如何批量提取文本里百度网盘链接  
当前文件夹内N个这样的文本,内容基本都是这样格式的

例子:
链接:https://pan.baidu.com/s/130Ah3RkSzRSJxF50TQh3ZA
提取码:cd1u
--来自百度网盘超级会员V8的分享

如何将这1千多个文本内这样的链接和提取码 保存到一个新文本里呢?
最好保存格式为一行一个
提取后保存后的格式为:
链接:https://pan.baidu.com/s/130Ah3RkSzRSJxF50TQh3ZA 提取码:cd1u



PS:我知道怎么写提取一行关键字到新文本,这个属实不会,请大佬教一下。。
作者: ShowCode    时间: 2023-11-17 13:13

回复 1# qlit


V1.bat
  1. @echo off
  2. cd /d "%~dp0"
  3. setlocal enabledelayedexpansion
  4. set "OldFile=1.txt"
  5. set "NewFile=2.txt"
  6. type nul > "%NewFile%"
  7. for /f "delims=" %%i in ('type "%OldFile%"') do (
  8.     set "ThisRow=%%i"
  9.     if "!ThisRow:链接=!" neq "!ThisRow!" (
  10.         set /p =!ThisRow! <nul
  11.         >> "%NewFile%" set /p =!ThisRow! <nul
  12.     ) else if "!ThisRow:提取码=!" neq "!ThisRow!" (
  13.         echo,!ThisRow!
  14.         >> "%NewFile%" echo,!ThisRow!
  15.     )
  16. )
复制代码

作者: ShowCode    时间: 2023-11-17 13:14

回复 1# qlit


V2.bat
  1. @echo off
  2. cd /d "%~dp0"
  3. setlocal enabledelayedexpansion
  4. set "OldFile=1.txt"
  5. set "NewFile=2.txt"
  6. (for /f "delims=" %%i in ('type "%OldFile%"') do (
  7.     set "ThisRow=%%i"
  8.     if "!ThisRow:链接=!" neq "!ThisRow!" (
  9.         set /p =!ThisRow! <nul
  10.     ) else if "!ThisRow:提取码=!" neq "!ThisRow!" (
  11.         echo,!ThisRow!
  12.     )
  13. ))> "%NewFile%"
复制代码

作者: qlit    时间: 2023-11-17 13:23

回复 3# ShowCode


    多谢已解决!!!
作者: ShowCode    时间: 2023-11-17 13:29

回复 4# qlit


可以考虑直接生成这种格式:
https://pan.baidu.com/s/130Ah3RkSzRSJxF50TQh3ZA?pwd=cd1u
可以直接打开,不需要再手工输入提取码。




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2