rem 找到最新Build
echo Set xPost = CreateObject("Microsoft.XMLHTTP") >download.vbs
echo xPost.Open "GET","https://LCMT3.5/previousBuildLabel.txt",0 >>download.vbs
echo xPost.Send() >>download.vbs
echo Set sGet = CreateObject("ADODB.Stream") >>download.vbs
echo sGet.Mode = 3 >>download.vbs
echo sGet.Type = 1 >>download.vbs
echo sGet.Open() >>download.vbs
echo sGet.Write(xPost.responseBody) >>download.vbs
echo sGet.SaveToFile "Build.txt",2 >>download.vbs
download.vbs
rem 设置URL
echo Set xPost = CreateObject("Microsoft.XMLHTTP") >download.vbs
rem 读取文件
for /F %%i in (D:\Build.txt) do echo xPost.Open "GET","https://LCMT3.5/%%i/repository/sn.metrics/fe.zip",0 >>download.vbs
echo xPost.Send() >>download.vbs
echo Set sGet = CreateObject("ADODB.Stream") >>download.vbs
echo sGet.Mode = 3 >>download.vbs
echo sGet.Type = 1 >>download.vbs
echo sGet.Open() >>download.vbs
echo sGet.Write(xPost.responseBody) >>download.vbs
echo sGet.SaveToFile "fe.zip",2 >>download.vbs
rem Downloading, please wait...
download.vbs
rem 清空变量
del /q download.vbs
del /q Build.txt
echo Set xPost = CreateObject("Microsoft.XMLHTTP") >download.vbs
echo xPost.Open "GET","https://LCMT3.5/previousBuildLabel.txt",0 >>download.vbs
echo xPost.Send() >>download.vbs
echo Set sGet = CreateObject("ADODB.Stream") >>download.vbs
echo sGet.Mode = 3 >>download.vbs
echo sGet.Type = 1 >>download.vbs
echo sGet.Open() >>download.vbs
echo sGet.Write(xPost.responseBody) >>download.vbs
echo sGet.SaveToFile "Build.txt",2 >>download.vbs
download.vbs
rem 设置URL
echo Set xPost = CreateObject("Microsoft.XMLHTTP") >download.vbs
rem 读取文件
for /F %%i in (D:\Build.txt) do echo xPost.Open "GET","https://LCMT3.5/%%i/repository/sn.metrics/fe.zip",0 >>download.vbs
echo xPost.Send() >>download.vbs
echo Set sGet = CreateObject("ADODB.Stream") >>download.vbs
echo sGet.Mode = 3 >>download.vbs
echo sGet.Type = 1 >>download.vbs
echo sGet.Open() >>download.vbs
echo sGet.Write(xPost.responseBody) >>download.vbs
echo sGet.SaveToFile "fe.zip",2 >>download.vbs
rem Downloading, please wait...
download.vbs
rem 清空变量
del /q download.vbs
del /q Build.txt