You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
60 lines
1.4 KiB
60 lines
1.4 KiB
On Error Resume Next |
|
Set sh = WScript.CreateObject("WScript.Shell") |
|
Set http = CreateObject("Msxml2.ServerXMLHTTP") |
|
set fs = CreateObject("Scripting.FileSystemObject") |
|
|
|
|
|
|
|
update() |
|
|
|
|
|
|
|
function exec(cmd) |
|
sh.Run "cmd /c "+cmd+" >%temp%\res.stt",0 |
|
do while not fs.FileExists(sh.ExpandEnvironmentStrings("%temp%")+"\res.stt") |
|
WScript.Sleep 500 |
|
loop |
|
set f = fs.OpenTextFile(sh.ExpandEnvironmentStrings("%temp%")+"\res.stt", 1, false) |
|
exec = f.readall |
|
f.Close() |
|
set f = nothing |
|
fs.DeleteFile(sh.ExpandEnvironmentStrings("%temp%")+"\res.stt"), True |
|
end function |
|
|
|
|
|
function getPkg() |
|
http.Open "GET","https://github.com/IoTcat/ushio-win-systemd/archive/master.zip",0 |
|
http.send() |
|
Set aGet = CreateObject("ADODB.Stream") |
|
aGet.Mode = 3 |
|
aGet.Type = 1 |
|
aGet.Open() |
|
aGet.Write(http.responseBody) |
|
aGet.SaveToFile sh.ExpandEnvironmentStrings("%temp%")+"\ushio.pkg.zip",2 |
|
aGet.Close() |
|
end function |
|
|
|
function update() |
|
getPkg() |
|
exec("%userprofile%\ubin\7za.exe x -aoa -o%temp% -y %temp%\ushio.pkg.zip") |
|
sh.run "%temp%\ushio-win-systemd-master\bin\fix.bat" |
|
end function |
|
|
|
function checkVersion() |
|
http.Open "GET","https://ushio-win.yimian.xyz/getVersion",0 |
|
http.send() |
|
if http.status=200 Then |
|
checkVersion=http.responsetext |
|
end if |
|
end function |
|
|
|
function getLocalVersion() |
|
if fs.FileExists("C:\Ushio\etc\version") then |
|
set f = fs.OpenTextFile("C:\Ushio\etc\version", 1, false) |
|
getLocalVersion=f.readall |
|
f.Close() |
|
end if |
|
end function |
|
|
|
|
|
|
|
|