Written before, I thought it was not useful, so I didn't post it out
@echo off
title windows xp/2003 Automatic Update V:1.2 by:vkill
::For detailed information, please view http://www.vkill.net/cmd-life/p-SystemAutoUpdate.html
::Requires wget.exe / sed.exe / ConCmd.rar(ConCmd.exe ConCmd.ini gbfix.dat B5fix.dat) files. Please download from http://www.vkill.net/tools.html
::config:::::::::::::::::::::
::Modifiable parameters. The start date refers to finding all updates released after this date. The start date has priority over the release date
set "start_date=4/1/2007"
set "release_date=90"
set "t=test.t"
::The following are non-modifiable parameters. If modified, please view http://www.microsoft.com/downloads/advancedsearch.aspx?displaylang=zh-cn
set "keyword="
set "product/technology="
set "category=7"
set "result_sorting_method=date"
set "results_per_page=50"
set "language=zh-cn"
set "show_english=on"
set "url=http://www.microsoft.com/downloads/"
::start::::::::::::::::::::::::::::::
::When running this program with parameter /update_code, it will automatically update
set "o=%~0"
if "%~1"=="/update_code" (call :update_code & exit /b)
if exist 需安装补丁.txt (
echo Last update not completed, continue to update from last time. It will automatically start after 6 seconds
ping -n 6 127.1 >nul 2>nul
goto down_and_install_up
)
set "keyword="
ver|find "5.1" >nul 2>nul &&(set "keyword=xp")
ver|find "5.2" >nul 2>nul &&(set "keyword=2003")
if not defined keyword (echo This program only supports xp/2003 systems. It will exit after 6 seconds&ping -n 6 127.1 >nul 2>nul&goto :eof)
for /f "tokens=2 delims=" %%? in ('ping -n 1 www.microsoft.com ^|findstr /i "^ping.*"') do (set "ip=%%?")
if not defined ip (echo Cannot connect to microsoft.com. It will exit after 6 seconds&ping -n 6 127.1 >nul 2>nul&goto :eof)
echo Searching for patches to install, please wait......
md "%t%" >nul 2>nul
pushd "%t%"
del /f/q *.* >nul 2>nul
for /f "tokens=*" %%? in ('echo %start_date%^|sed -r "s/\/|\-|\./%%2f/g"') do (set "start_date=%%?")
set "url_downi=%url%results.aspx?startdate=%start_date%&freetext=%keyword%&productID=%product/technology%&categoryId=%category%&period=%release_date%&sortCriteria=%result_sorting_method%&nr=%results_per_page%&DisplayLang=%language%&DisplayEnglishAlso=%show_english%"
set n=0
:loop_down_i
set/a n+=1
wget -q -O "index.txt" "%url_downi%"
ConCmd.exe /i:utf8 /o:gbk /q "index.txt" "i_%n%.txt"
findstr ">Next" "i_%n%.txt" >nul 2>nul &&(
for /f "tokens=*" %%? in ('sed -r "/>Next/!d;s/.*<a href=\x22(*)\x22>.*/\1/;s/amp;//g" "i_%n%.txt"') do (set "url_downi=%url%%%?")
goto loop_down_i
)
::loop_down_i end
for /l %%? in (1,1,%n%) do (
sed -r "/?KB{6}?<\/a>/!d;s/.*(<a href=\x22)(*)(\x22>)(.*)?(KB{6})?(<\/a>).*/\5,\4,\2/;s/amp;//g" "i_%%?.txt"|more>>"liebiao.txt"
)
::Filter x86 /x64
copy liebiao.txt liebiao_l.txt >nul 2>nul
if "%PROCESSOR_ARCHITECTURE%"=="x86" (findstr /V "x64" liebiao_l.txt >liebiao.txt 2>nul)
if "%PROCESSOR_ARCHITECTURE%"=="x64" (findstr /V "x86" liebiao_l.txt >liebiao.txt 2>nul)
::Find the absolute download address of the file to be updated
cd.>downpage.txt
for /f "tokens=1,2,3 delims=," %%a in ('type "liebiao.txt"') do (
del /f/q "t_*.txt" >nul 2>nul
wget -q -O "t_u.txt" "%url%%%c"
ConCmd.exe /i:utf8 /o:gbk /q "t_u.txt" "t_g.txt"
sed -r "/value=\x22(Download|Download)\x22><\/form>/!d;s/.*\{window.open*'(*)',.*/%%a,%%b,\1/" "t_g.txt"|more>>"downpage.txt"
)
for /f "tokens=*" %%? in ('systeminfo^|sed -r "/KB{6}/!d;s/.*(KB{6}).*/\1/"') do (>>"已安装补丁.txt" echo %%?)
findstr /B /V /G:"已安装补丁.txt" "downpage.txt" >"..\需安装补丁.txt" 2>nul
popd
:down_and_install_up
mode con cols=100 lines=30
echo -----windows xp/2003 Automatic Update-----
echo.
echo The list of patches to be installed is as follows:
echo ________________________________________________________________________________
for /f "tokens=1,2,3 delims=," %%a in ('type "需安装补丁.txt"') do (echo "%%a,%%b")
echo ________________________________________________________________________________
for /f "tokens=1,2,3 delims=," %%a in ('type "需安装补丁.txt"') do (
echo "%%a,%%b" Patch
echo Downloading, please wait......
wget -c -q -O "%%~nxc" "%%c"
echo Installing, please wait......
::For parameters of Microsoft patch automatic installation, see the bottom - attached -
"%%~nxc" /passive /norestart /u /o /z /q
)
echo All patches have been installed. It will exit after 6 seconds&ping -n 6 127.1>nul 2>nul
del /f/q 需安装补丁.txt>nul 2>nul
goto :eof
:update_code
setlocal ENABLEDELAYEDEXPANSION
::Last update
md "%t%" >nul 2>nul
pushd "%t%"
del /f/q *.*>nul 2>nul
wget -q -O "i.txt" "http://www.vkill.net/cmd-life/p-SystemAutoUpdate.html"
for /f "tokens=1 delims=:" %%? in ('findstr /N "^<TEXTAREA" "i.txt"') do (more +%%? i.txt>"a")
for /f "tokens=1 delims=:" %%? in ('findstr /N "^<\/TEXTAREA>" "i.txt"') do (set/a "a=%%?-1" & more +!a! i.txt>"b")
findstr /V /B /E /G:"b" "a">"c"
for /f "tokens=2 delims=" %%? in ('findstr "^::Last update\" "%o%"') do (set "lastupdate_l=%%?")
if not defined lastupdate_l (set "lastupdate_l=06/06/2007")
for /f "tokens=2 delims=" %%? in ('findstr "^::Last update\" "c"') do (set "lastupdate_n=%%?")
if "%lastupdate_l%" lss "%lastupdate_n%" (
echo New version detected. Press any key to start updating. After the update is completed, the program will automatically exit. Please run it again
pause>nul
copy "c" "%o%"
) else (echo This program is currently the latest version. Press any key to exit&pause>nul)
goto :eof
::Attached - Microsoft patch automatic installation command:::::::::::::::::::
*.exe /passive /norestart parameters
-u Unattended mode
-f Force other programs to close when shutting down
-n Do not back up files for uninstallation
-o Do not prompt to overwrite OEM files
-z Do not restart after installation
-q Installation mode (no user participation)
-l List installed patch programs
-s:<dir> Integrate Service Pack files into <dir> path
-d:<dir> Back up files to <dir> path
::::::::::::::::::::::::::::::::::::::::::::::
::
