|
|
楼主 |
发表于 2023-8-19 16:39:13
|
显示全部楼层
本帖最后由 thp2008 于 2023-8-19 16:43 编辑
感谢大家的帮助,太好用了,已成功下载几十部短视频,最终成品分享给大家。- @echo off
- REM 脚本保存为ANSI编码格式
- echo.
- echo 视频号自动下载脚本
- set n=1
- REM 将下面的D:\WXVideo,换成你自已的视频号下载保存目录路径就好了。
- set mulu=D:\WXVideo
- if exist %mulu%\WX%n%.mp4 goto Jiance
- :start
- echo.
- set /p zfc=请输入或粘贴下载链接:
- echo.
- set "zfc=%zfc:/20302/=/20304/%"
- set "zfc=dl=%zfc%"
- for /l %%i in (1,1,31) do call :re %%i
- set "url=%dl%?encfilekey=%encfilekey%&token=%token%"
- if not exist "%mulu%\WX%n%.mp4" set "outfile=%mulu%\WX%n%.mp4"&goto :dl
- :dl
- echo 马上为您下载,请稍等......
- echo.
- curl -o "%outfile%" -k --connect-timeout 15 --max-time 720 "%url%"
- echo.
- echo 下载完成。
- set /a n=n+1
- goto start
- :Jiance
- cd /d "%mulu%"
- for /l %%s in (5000,-1,1) do (
- if exist "*%%s.mp4" (
- set /a n=%%s+1
- goto :start
- )
- )
- :re
- for /f "tokens=%1 delims=?&" %%i in ("%zfc%") do set "%%i"
复制代码 |
|