Bonjour,
Voilà une version épurée de ton script, avec une ligne au début pour récupérer le nom du réseau :
Code :
- @echo off
- setlocal enableextensions enabledelayedexpansion
- ver | find "10.0." >nul && chcp 65001 >nul || chcp 28591 >nul
- color 0A
- for /f "tokens=2 delims==" %%A in ('WMIC NIC WHERE ^(NetEnabled^=TRUE AND GUID is not Null^) GET NetConnectionID /FORMAT:LIST ^| findstr .') do if not defined carte set "carte=%%A"
- if not defined carte (exit /b 1)
- set static1=192.168.1.65;255.255.255.0;;;
- set static2=10.0.10.3;255.0.0.0;;;
- set static3=192.168.168.65;255.255.255.0;;;
- set static4=10.1.10.11;255.0.0.0;10.1.10.12;;
- set static5=192.168.0.11;255.255.255.240;192.168.0.1;;
- set static6=172.31.255.100;255.255.255.0;172.31.255.1;;
- set static7=192.168.1.10;255.255.255.0;192.168.1.1;8.8.8.8;
- set static8=192.0.2.11;255.255.255.0;192.0.2.1;;
- :question
- cls
- echo.-------------------------------------------------------------
- echo.---------- CARTE RESEAU : "%carte%"
- echo.-------------------------------------------------------------
- set "lan="
- set /p lan="Adressage IP 0/ DCHP 1/ 192.168.1.65 2/ 10.0.10.3 3/ 192.168.168.65 4/ 10.1.10.11 5/ 192.168.0.11 6/ 172.31.255.100 7/192.168.1.10 8/192.0.2.11 9/ QUITTER (0/1/2/3/4/5/6/7/8/9)? : "
- if not defined lan (goto question)
- timeout /t 1 /nobreak >nul
- echo.
- if "%lan%"=="9" (goto Nfin)
- if "%lan%"=="0" (
- set "val="
- set /p val="confirmer l'adressage en IP Dynamique (O/N)? : "
- if /i "!val!"=="O" (goto OKDHCP) else (goto question)
- )
- call :configuration "!static%lan%!" && goto Ofin
- goto question
- :configuration
- for /f "tokens=1-4 delims=;" %%A in ("%~1" ) do (
- set "address=%%~A"
- set "mask=%%~B"
- set "gateway=%%~C"
- set "dns=%%~D"
- )
- set "conf="
- set /p conf="confirmer l'adressage en IP Fixe "!address!" (O/N)? : "
- if not "%conf%"=="O" (exit /b 1)
- netsh int ipv4 set address %carte% static !address! !mask! !gateway!
- if defined dns (netsh int ipv4 set dnsservers "%carte%" static !dns! no) else (netsh int ipv4 delete dnsservers "%carte%" all >nul)
-
- exit /b 0
- :OKDHCP
- netsh int ipv4 set address %carte% dhcp
- netsh int ipv4 delete dnsservers %carte% all >nul
- netsh int ipv4 set dnsservers %carte% dhcp >nul
- :Ofin
- echo.
- @echo La nouvelle configuration vient d'etre appliquee
- @echo -
- SET /P quit=appuyer sur [ENTREE] pour quitter
- exit
- :Nfin
- echo.
- @echo Aucune modification n'a ete appliquee
- @echo -
- SET /P quit=appuyez sur [ENTREE] pour quitter
- exit
|