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

youuoy

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

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

zaqmlp

@echo off
title 互助互利,代码可用,扫码头像,感谢赞助;有问题,加QQ956535081及时沟通
cd /d "%~dp0"
set "入=aa.txt"
set "出=bb.txt"
set "字串=https://bbs.xxx.com/view_video.php?viewkey="
powershell "$s='';$t=@(gc '%入%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{$s+='%字串%'+$_.value+\"`r`n\";};out-file -file '%出%' -input $s -enc Default;"
pause
复制代码

youuoy

回复 2# zaqmlp


   
谢谢大大，可以使用

能否再帮忙一下。

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

zaqmlp

回复 3# youuoy
赞助下，我帮你改

youuoy

回复 4# zaqmlp


    怎么赞助?大大

zaqmlp

回复 5# youuoy

支付宝扫码头像

Batcher

回复 3# youuoy


第6行代码改成这样试试：
powershell "$t=@(gc '%入%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{'bbs.XXX.com?view=' + $_.value}|sc '%出%';

youuoy

回复 7# Batcher


好像不行

但是我想出来了。。。

title 互助互利,代码可用,扫码头像,感谢赞助;有问题,加QQ956535081及时沟通
cd /d "%~dp0"
set "a=1.txt"
set "b=2.txt"
powershell "$t=@(gc '%a%') -join \"`r`n\";[regex]::matches($t,'(?<=_vkey=\")[^^\"]+')|%%{$_.value}|sc '%b%';

SET "TheStart=https://bbs.xxx.com/view_video.php?viewkey="
FOR /f "tokens=*" %%i IN (2.txt) DO (
>>download.txt ECHO %TheStart%%%i
)
复制代码

youuoy

回复 6# zaqmlp


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

zaqmlp

回复 9# youuoy

一次友好的互助，已改，感谢赞助

Batcher

回复 8# youuoy


    “好像不行”的报错信息是什么，能否发出来我看下是啥原因

youuoy

回复 11# Batcher


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