[其他] 怎么用批处理下载客户端？

q9339

怎么用批处理脚本下载 网站  https://shop.ele.me/apps/pc/?t=ls-pc  或者  https://shadow.elemecdn.com/crayfish/napos-app-download/lingshou/pc    里的exe文件呢 ？
主要用于每次网站更新客户端的时候，  手动点击更新， 因为 客户端不可以在线更新， 每次更新链接都会有变化， 想通过脚本自动获取最新的下载地址， 实现手动更新。

jyswjjgdwtdtj

回复 26# mzzyb


    ie支持自动化

mzzyb

为什么不用internet.application?起码现在的网页还是支持ie11的吧
jyswjjgdwtdtj 发表于 2023-4-23 18:24

    域服务器更新域成员的客户端好像，不然为什么要求用cmd来写下载更新客户端，只是1台电脑，点几下都完成了~~~

77七

回复 24# q9339


  

@echo off
for /f tokens^=16delims^=^" %%a in ('curl "https://nr.ele.me/eleme_nr_bfe_retail/eb_download/config/download"') do (
        curl -O "%%a"
)
pause
复制代码

q9339

windows下 curl就是一个单文件exe 你放到同级目录里面就可以了

@echo off
setlocal enabledelayedexpansion
curl -k "https://nr.ele.me/eleme_nr_bfe_retail/eb_download/config/download" -o "elme.txt"
for /f tokens^=16^ delims^=^" %%i in (elme.txt) do bitsadmin /transfer n "%%i" "D:\elme.exe"
del elme.txt
pause

把curl和这个BAT放到同一个目录下运行bat就行

jyswjjgdwtdtj

回复 20# idwma


    你不去搞个xp或者2000应该没大问题吧……我也不知道
我在mshta（ie7）试了一下 卡了好久才报错……

idwma

回复 21# q9339


下在当前目录，没有就不知道什么原因了

q9339

win7试试这个ai给的方法
idwma 发表于 2023-4-23 18:53

    这个文件下载 在哪里的啊？   运行了  按了 回车 最后好像 什么都没。。

idwma

回复 19# jyswjjgdwtdtj


    可能不通用吧

jyswjjgdwtdtj

回复 16# idwma


    这个不能用额

jyswjjgdwtdtj

实测可用
绝对好用 速度也不慢

jyswjjgdwtdtj

set ie=createobject("internetexplorer.application")
ie.visible=false
ie.navigate "https://shop.ele.me/apps/pc/?t=ls-pc"
do until ie.readystate=4
wscript.sleep 100
loop
url=ie.document.getelementsbyclassname("pc-download")(0).getelementsbytagname("a")(0).href

Set http = CreateObject("Msxml2.XMLHTTP") 
Set ado = createobject("Adodb.Stream")
	with http
	.open "GET",url,false
	.send
	ado.Type =1
	ado.Open
	ado.Write .responsebody
	ado.SaveToFile "1.exe"
	ado.Close
	end with
set ws=createobject("wscript.shell")
ws.run "1.exe"
复制代码

简单粗暴 不动脑子 直接用浏览器找好吧

idwma

win7试试这个ai给的方法

#@&cls&powershell "type '%~f0'|out-string|iex"&pause&exit
$wc = New-Object System.Net.WebClient
$wc.DownloadString('https://nr.ele.me/eleme_nr_bfe_retail/eb_download/config/download') -match 'http[^"]+'
$sourceStream = $wc.OpenRead($matches[0])
$targetStream = new-object System.IO.FileStream(("$pwd\"+($matches[0]-replace'.+/')), [System.IO.FileMode]::Create)
$gzipStream = new-object System.IO.Compression.GZipStream($sourceStream, [System.IO.Compression.CompressionMode]::Decompress)

$buffer = new-object byte[](1024)
while($true)
{
  $read = $gzipStream.Read($buffer, 0, 1024)
  if($read -le 0){ break }
  $targetStream.Write($buffer, 0, $read)
}

$gzipStream.Close()
$targetStream.Close()
$sourceStream.Close()
复制代码

jyswjjgdwtdtj

为什么不用internet.application?起码现在的网页还是支持ie11的吧

q9339

回复  idwma


    downloadUrl似乎是在Content里的
buyiyang 发表于 2023-4-22 22:19

    运行报错。。。 报错如下：




无法将“iwr”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼
写，如果包括路径，请确保路径正确，然后重试。
所在位置 行:1 字符: 19
+ $downloadUrl = iwr <<<<  'https://nr.ele.me/eleme_nr_bfe_retail/eb_download/c
onfig/download' | ConvertFrom-Json | Select-Object -ExpandProperty downloadUrl;
iwr $downloadUrl -outfile ($downloadUrl -replace '.+/')
    + CategoryInfo          : ObjectNotFound: (iwr:String) [], CommandNotFound
   Exception
    + FullyQualifiedErrorId : CommandNotFoundException

无法将“iwr”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼
写，如果包括路径，请确保路径正确，然后重试。
所在位置 行:1 字符: 154
+ $downloadUrl = iwr 'https://nr.ele.me/eleme_nr_bfe_retail/eb_download/config/
download' | ConvertFrom-Json | Select-Object -ExpandProperty downloadUrl;iwr <<
<<  $downloadUrl -outfile ($downloadUrl -replace '.+/')
    + CategoryInfo          : ObjectNotFound: (iwr:String) [], CommandNotFound
   Exception
    + FullyQualifiedErrorId : CommandNotFoundException