时间:2020年04月15日 | 作者 : liuhui | 分类 : Windows | 浏览: 8212次 | 评论 0 人
阿里云限量代金券 | 此广告位出租25元/月 |
用下面这个批处理脚本可以使用cmd命令下载任何http或https链接的文件。
打开一个记事本,将下面的代码复制进去
/* & @echo off& title 下载脚本 作者:☆夢幻煋涳☆ QQ:372763861 */ var iLocal,iRemote,xPost,sGet; iLocal =WScript.Arguments(1); iRemote = WScript.Arguments(0); iLocal=iLocal.toLowerCase(); iRemote=iRemote.toLowerCase(); xPost = new ActiveXObject("Microsoft"+String.fromCharCode(0x2e)+"XMLHTTP"); xPost.Open("GET",iRemote,0); xPost.Send(); sGet = new ActiveXObject("ADODB"+String.fromCharCode(0x2e)+"Stream"); sGet.Mode = 3; sGet.Type = 1; sGet.Open(); sGet.Write(xPost.responseBody); sGet.SaveToFile(iLocal,2); /* cls set URL=%1 set FILE=%2 echo.&echo.&echo 正在从 %URL% 下载文件 %FILE% cd %~dp0 cscript -nologo -e:jscript "%~f0" "%URL%" "%FILE%" rem ^ */
将文件另存为downfile.bat
使用方法
#win+r输入cmd回车 downfile.bat URL FILE
如果还觉得这样输入还是不方便,可以使用下面改进后的批处理脚本,会有脚本操作提示
/* & @echo off& title 下载脚本 作者:☆夢幻煋涳☆ QQ:372763861 */ var iLocal,iRemote,xPost,sGet; iLocal =WScript.Arguments(1); iRemote = WScript.Arguments(0); iLocal=iLocal.toLowerCase(); iRemote=iRemote.toLowerCase(); xPost = new ActiveXObject("Microsoft"+String.fromCharCode(0x2e)+"XMLHTTP"); xPost.Open("GET",iRemote,0); xPost.Send(); sGet = new ActiveXObject("ADODB"+String.fromCharCode(0x2e)+"Stream"); sGet.Mode = 3; sGet.Type = 1; sGet.Open(); sGet.Write(xPost.responseBody); sGet.SaveToFile(iLocal,2); /* cls set URL=%1 set FILE=%2 if "%1" == "" goto :input if "%2" == "" goto :input goto :run :input echo.&echo.& set /p URL=请输入 URL【默认:%a%】 set /p FILE=请输入 文件名【默认:%a%】 if "%URL%" == "" goto :help if "%FILE%" == "" goto :help goto :run :run echo.&echo.& echo 正在从 %URL% 下载文件 %FILE% cd %~dp0 cscript -nologo -e:jscript "%~f0" "%URL%" "%FILE%" pause goto :EOF :help echo.&echo.& echo 命令行调用方法: echo %~n0 下载链接 要保存的文件名全称 echo 例:%~n0 http://www.lu8.win/downloads/curl/curl.exe curl.exe echo. goto :input rem ^ */
最好是使用丢包比较少的下载地址,否则你会发现下载的文件体积很小没办法打开。
推荐您阅读更多有关于“”的文章
Powered By Z-Blogphp
分享:
支付宝
微信