[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 批处理怎样提取指定关键字后面的双引号的内容?

<li class=" js-pop videoblock videoBox" id="B95322501" _vkey="XX58200e68e9c76" data-id="95322501" data-segment="straight" data-entrycode="VidPg-premVid">

比如有很多行,提取每行vkey后面双引号后面的XX58200e68e9c76到另外一个文本。

回复 11# Batcher


    好的。等会我再试试。当时是无法运行。谢谢

TOP

回复 8# youuoy


    “好像不行”的报错信息是什么,能否发出来我看下是啥原因
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 9# youuoy

一次友好的互助,已改,感谢赞助
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 6# zaqmlp


    赞助了五块。谢谢您的代码!

TOP

回复 7# Batcher


好像不行

但是我想出来了。。。
  1. title 互助互利,代码可用,扫码头像,感谢赞助;有问题,加QQ956535081及时沟通
  2. cd /d "%~dp0"
  3. set "a=1.txt"
  4. set "b=2.txt"
  5. powershell "$t=@(gc '%a%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{$_.value}|sc '%b%';
  6. SET "TheStart=https://bbs.xxx.com/view_video.php?viewkey="
  7. FOR /f "tokens=*" %%i IN (2.txt) DO (
  8. >>download.txt ECHO %TheStart%%%i
  9. )
复制代码

TOP

回复 3# youuoy


第6行代码改成这样试试:
powershell "$t=@(gc '%入%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{'bbs.XXX.com?view=' + $_.value}|sc '%出%';
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 5# youuoy

支付宝扫码头像
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 4# zaqmlp


    怎么赞助?大大

TOP

回复 3# youuoy
赞助下,我帮你改
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

回复 2# zaqmlp


   
谢谢大大,可以使用

能否再帮忙一下。

提取后的XX58200e68e9c76我想在前面加个网址,比如bbs.XXX.com?view=XX58200e68e9c76,不知道怎么加?谢谢

TOP

本帖最后由 zaqmlp 于 2019-4-1 20:59 编辑
  1. @echo off
  2. title 互助互利,代码可用,扫码头像,感谢赞助;有问题,加QQ956535081及时沟通
  3. cd /d "%~dp0"
  4. set "入=aa.txt"
  5. set "出=bb.txt"
  6. set "字串=https://bbs.xxx.com/view_video.php?viewkey="
  7. powershell "$s='';$t=@(gc '%入%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{$s+='%字串%'+$_.value+\"`r`n\";};out-file -file '%出%' -input $s -enc Default;"
  8. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表