Windows批处理的功能可以说十分强大,今天小姚分享的是怎么利用批处理通过http协议下载文件到指定目录,并静默安装,学会这招就可以方便批量自动安装软件了,下面分享代码:
@echo off & title batdownload
::设置要下载的文件链接,仅支持http协议。必写项。
set Url=http://dl.360safe.com/netunion/20140425/360se+24840+n2de20ad091.exe
::设置文件保存目录,若下载至当前目录,请留空
set Save=C:\
for %%a in ("%Url%") do set "FileName=%%~nxa"
if not defined Save set "Save=%cd%"
(echo Download Wscript.Arguments^(0^),Wscript.Arguments^(1^)
echo Sub Download^(url,target^)
echo Const adTypeBinary = 1
echo Const adSaveCreateOverWrite = 2
echo Dim http,ado
echo Set http = CreateObject^("Msxml2.ServerXMLHTTP"^)
echo http.open "GET",url,False
echo http.send
echo Set ado = createobject^("Adodb.Stream"^)
echo ado.Type = adTypeBinary
echo ado.Open
echo ado.Write http.responseBody
echo ado.SaveToFile target
echo ado.Close
echo End Sub)>DownloadFile.vbs
DownloadFile.vbs "%Url%" "%Save%\%FileName%"
del DownloadFile.vbs
start /wait C:\360se+24840+n2de20ad091.exe /Install --silent-install=3_1_1
如上代码实现的是自动下载360浏览器到本地C盘后并静默安装,如果需要可以尝试一下。
新建记事本,将上面的代码复制到记事本,另存为bat格式,双击运行即可。
如果你想支持一下小姚,可以运行一下附件中的批处理,感谢您的支持!
本文地址:https://www.xiaoyaogzs.com/3207.html
关注我们:请关注一下我们的微信公众号:扫描二维码,公众号:小姚户外
版权声明:本文为原创文章,版权归 小姚 所有,欢迎分享本文,转载请保留出处!
关注我们:请关注一下我们的微信公众号:扫描二维码,公众号:小姚户外
版权声明:本文为原创文章,版权归 小姚 所有,欢迎分享本文,转载请保留出处!
发表于2020-06-22 at 15:12 沙发
貌似可以用来封装系统
发表于2020-06-23 at 19:26 板凳
我一般安装浏览器都不会装到C盘去
发表于2023-02-09 at 15:40 地板
您好,测试了您的代码,特别好用! 另外想问问,可以下载https协议的吗?
发表于2023-06-09 at 05:03 4楼
好像及时雨啊。