JavaScript отключён. Чтобы полноценно использовать наш сайт, включите JavaScript в своём браузере.

Ответить в теме

Сообщение: [QUOTE="Foxik, post: 247292, member: 8570"] Не много сократил [code=batch]@echo off & cls rem ***************************************************** rem Copyright: Foxik rem Create: 2017 rem ***************************************************** Echo ╔════════════════════════════════════════════════════════════════════════════╗ Echo ║ ║ Echo ║ Проверка версии драйвера(MS17-010) против WannaCry ║ Echo ║ ║ Echo ╚════════════════════════════════════════════════════════════════════════════╝ Set "xOS=x64"& If "%PROCESSOR_ARCHITECTURE%"=="x86" If Not Defined PROCESSOR_ARCHITEW6432 Set "xOS=x32" set x=0 set "_key=HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" for /f "usebackq delims=" %%a in (`mshta "vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(CreateObject("Scripting.FileSystemObject").GetFileVersion("c:\windows\system32\drivers\srv.sys"))&Close()"`) do set verfile=%%a echo %verfile% for /f "tokens=4 delims=." %%a in ("%verfile%") do set verfile=%%a For /f "tokens=2*" %%a In ('Reg.exe query "%_key%" /v "CurrentVersion"^|Find "CurrentVersion"') do set "_ver=%%~b" For /f "tokens=2*" %%a In ('Reg.exe query "%_key%" /v "CurrentBuild"^|Find "CurrentBuild"') do set "_build=%%~b" If %_ver% == 6.1 Goto 7 If %_ver% == 6.2 Goto 8 If %_ver% == 6.3 (If %_build% == 9600 (Goto 81) Else Goto 10) Echo %_ver% Версия Windows не поддерживается ;( :7 Title Windows 7 %xOS% build:%_build% if %verfile% GEQ 23689 goto OK set Kb=4019264 set download=windows6.1-kb4019264-x86_aaf785b1697982cfdbe4a39c1aabd727d510c6a7.msu if "%xOS%"=="x64" set download=windows6.1-kb4019264-x64_c2d1cef74d6cb2278e3b2234c124b207d0d0540f.msu call:install GOTO EOF :8 Title Windows 8 / 2012 %xOS% if %verfile% GEQ 22099 goto OK set Kb=4019216 set download=windows8-rt-kb4019216-x86_cac6186f5370d92721b0128975211b5463e53041.msu if "%xOS%"=="x64" set download=windows8-rt-kb4019216-x64_f27d07976b81b7749b759ff9b780098596cab5d0.msu call:install GOTO EOF :81 Title Windows 8.1 %xOS% build:%_build% if %verfile% GEQ 18604 goto OK set Kb=4019215 set download=windows8.1-kb4019215-x86_fe1cafb988ae5db6046d6e389345faf7bac587d7.msu if "%xOS%"=="x64" set download=windows8.1-kb4019215-x64_d06fa047afc97c445c69181599e3a66568964b23.msu call:install GOTO EOF :10 Title Windows 10 / 2016 %xOS% build:%_build% If %_build% == 10240 Goto 10240 If %_build% == 10586 Goto 10586 If %_build% == 14393 Goto 14393 GOTO OK :10240 if %verfile% GEQ 17319 goto OK set Kb=4019474 set download=windows10.0-kb4019474-x64_4ed033d1c2af2daea1298d10da1fad15a482f726.msu if "%xOS%"=="x64" set download=windows10.0-kb4019474-x86_259adeed4a4037f749afab211ff1bc6a771ff7f6.msu call:install GOTO EOF :10586 if %verfile% GEQ 839 goto OK set Kb=4019473 set download=windows10.0-kb4019473-x86_5e2b7bce2f1b116288b4f1f78449c66ecc7c7a53.msu if "%xOS%"=="x64" set download=windows10.0-kb4019473-x64_c23b6f55caf1b9d6c14161b66fe9c9dfb4ad475c.msu call:install GOTO EOF :14393 Title Windows 10 / 2016 if %verfile% GEQ 953 goto OK set Kb=4019472 set download=windows10.0-kb4019472-x86_9bf106e898b57c20917cd98fd8b8d250333015a5.msu if "%xOS%"=="x64" set download=windows10.0-kb4019472-x64_dda304140351259fcf15ca7b1f5b51cb60445a0a.msu call:install GOTO EOF :install echo. echo Требуется установить обновление KB%KB%... echo. echo 1. Скачать обновление через браузер echo 2. Найти обновление через браузер echo. Choice /C 12 /M "Выберите пункт:" if %errorlevel%==1 start "" http://download.windowsupdate.com/c/msdownload/update/software/secu/2017/05/%download% if %errorlevel%==2 start "" http://www.catalog.update.microsoft.com/Search.aspx?q=%KB% echo. exit /b :OK echo. echo Обновление не требуется... echo. :EOF pause exit[/code] [/QUOTE]

Проверка