Back to Top

Visual Basic Tools

Microsoft Windows Version ermitteln:

Title Windows Version wird geprüft...
FOR /f "tokens=1-4 delims=/[." %%a in ('VER') do set sver=%%a %%b
REM =============== Windows NT 4 ============================================
if "%sver%"=="Windows NT Version 4 0  " goto verok
REM =============== Windows 2000 ============================================
if "%sver%"=="Microsoft Windows 2000  Version 5" goto verok
REM =============== Windows XP ==============================================
if "%sver%"=="Microsoft Windows XP  Version 5" goto Verok
REM =============== Windows Vista ===========================================
if "%sver%"=="Microsoft Windows  Version 6" goto verok
goto vernok

:verok
echo -============================================================================-
echo -= Microsoft Windows Version...                                       [OK!] =-
echo -============================================================================-
echo -= Installation Abbrechen mit [STRG]+[C]                                    =-
echo -= zum Installieren bitte eine beliebige Taste drücken...                   =-
pause >nul
echo -============================================================================-

REM -============== Ab hier die Auszuführenden Befehle ==============-
REM -======================== ENDE ==========================-

goto xend

:vernok
echo Gefunden:%sver%!
echo -============================================================================-
echo -= Windows Version...                                              [ERROR!] =-
echo -============================================================================-
echo -============================================================================-
echo -== Falsche Microsoft Windows-Version!!! Es wird Windows XXXXX benötigt