乾坤听书橙红年代有声小说下载
Ⅰ 请教大佬帮忙做个bat可以批量提取有声小说网下载有声小说的链接
@echooff&title批量获取链接By依梦琴瑶
color0a&cd/d%~dp0
call:CreatDownloadPage
set/pName=请输入小说名称:
set/pUrl=请输入小说网址:
set/pNum=请输入小说集数:
for%%ain("%Url%")dosetID=%%~na
set"List=《%Name%》的迅雷链接.DownList"
ifexist"%List%"del/f/q"%List%"
for/l%%ain(1,1,%Num%)do(
echo正在获取小说《%Name%》第%%a集的链接...
call:GetThunderLink"%ID%""%%~a"
echo,
)
del/f/qGetDownloadPage.vbsDownloadPage.dat
echo小说《%Name%》的链接已获取完成,请检查日志记录。
pause
exit
:GetThunderLink
set/aN=%~2-1
rem注意!下面一行中的“域名”,请自行修改成对应的网址
GetDownloadPage.vbs"http://域名/downm.asp?id=%~1&t=0&k=%N%"
for/fskip^=1^tokens^=6^delims^=^"%%iin(DownloadPage.dat)doset"Link=%%~i"
del/f/qDownloadPage.dat
if/inot"%Link:~,8%"=="thunder:"(
echo链接获取失败
(echo%date:~10%%time:~,8%获取失败--《%Name%》第%~2集)>>"链接获取日志.Log"
goto:eof
)
(echo%Link%)>>"%List%"
echo链接获取成功
(echo%date:~,10%%time:~,8%获取成功--《%Name%》第%~2集)>>"链接获取日志.Log"
goto:eof
:CreatDownloadPage
(echoOnErrorResumeNext
echoDimXhp,Url,MyStream
echoUrl=WScript.Arguments^(0^)
echoSetXhp=CreateObject^("Microsoft.Xmlhttp"^)
echoXhp.Open"Get",Url,False
echoXhp.Send
echoSetMyStream=CreateObject^("Adodb.Stream"^)
echoMyStream.Type=1
echoMyStream.Open
echoMyStream.WriteXhp.ResponseBody
echoMyStream.SaveToFile"DownloadPage.dat",2)>GetDownloadPage.vbs
goto:eof
看了那个站点后,根据页面内容写出来的,切记,此脚本只能针对有单集下载的有效
执行脚本后,按提示输入内容并回车即可。
第一次执行前记得先把代码中的“域名”更改一下,这是因为防止这里被广告,而做的河蟹。
Ⅱ 为什么乾坤听书网有的故事能听,有的不能听
有一部分小说因为版权问题下架了吧
我也很喜欢听有声小说,最近一直在听果FM里听小说,目前在听盗墓笔记。
- 凡人修仙传播音:大灰狼
- 百炼成仙播音:皖宣灿灿
- 遮天播音:昊儒
- 天才医生_舒湘播音:舒湘
- 异世邪君-夜风版播音:夜风
- 校园全能高手播音:万里
- 武神播音:斯勇
- 长生不死播音:不叛
- 超级医生播音:浪雪
- 痞子术士播音:原野
- 人间冰器播音:华风
- 星戒播音:和光
- 医道官途播音:黎波
- 风水玄术-墓闻录播音:柴少鸿
- 灵罗戒播音:海鱼
- 铁骨播音:余然
- 武动乾坤播音:蜡笔小勇
- 橙红年代播音:蜘蛛
- 傲世九重天播音:我影随风
- 杀神播音:笑容可怕
Ⅳ 哪里可以免费听武动乾坤下部小说,喜马拉雅收费,
3000g西马拉丫所有mp3获取目录浏览器打开:xs。51pan。top
Ⅳ 有了 迅雷7 为什么 还是不能下载啊 求大佬 教怎么下载乾坤听书网单集下载
你自己看那链接像是迅雷的下载链接么?如果你觉得是,就复制链接然后打开迅雷新建任务,把地址粘贴进去。
个人认为这种网站根本就不会提供什么下载,提示访问者未安装什么什么只是它们骗用户点击网页骗取流量和点击率的一种手段。
Ⅵ 哪个手机APP有免费的《橙色年代》小说听要付费的就算了。
版权问题,现在正常情况下都是要收费的。喜马拉雅、懒人听书、蜻蜓FM等这些大平台就更加可能要收费了,免费的话可能要找一些小众APP了。类似一说APP,不知道有没有《橙红年代》,反正我在听的有声小说都是免费的。