MS-Dos Batch NWConfig Script Mudar IP Via Comando

MS-Dos Batch:
NWConfig Script:
Descrição: Script que permite mudar ip automáticamente / mapear ou remover drives de rede.

Salve o script a baixo em um arquivo .BAT

REM ***** INICIO BATCH *****
rem #################################################
rem ## Visit author site at: www.tiagomarques.info ##
rem #################################################
@echo off
title NWConfig script by Tiago Marques
setlocal
set OK=N
:mmenu
cls
@echo ##############
@echo # Main Menu: #
@echo ##############
@echo [1] Static IP Network 192.168.1.0
@echo [2] Static IP Network 192.168.2.0
@echo [3] Get IP by DHCP
@echo [7] Firewall Menu
@echo [8] Network Drives Menu
@echo [9] Show Current Network Configuration
@echo [0] Exit...
set /p choice=Insert Choice:
if /i [%choice%]==[0] endlocal&goto end
if [%choice%]==[] goto mmenu
if [%choice%]==[1] goto m1
if [%choice%]==[2] goto m2
if [%choice%]==[3] goto m3
if [%choice%]==[7] goto fmenu
if [%choice%]==[8] goto ndmenu
if [%choice%]==[9] goto m9
set /p x=Invalid option, press Enter and insert valid option...
goto mmenu
:fmenu
cls
@echo #####################
@echo # Firewall Options: #
@echo #####################
@echo [1] Enable Firewall
@echo [2] Disable Firewall
@echo [3] Show Current Firewall Config
@echo [9] Main Menu
@echo [0] Exit...
set /p choice=Insert Choice:
if /i [%choice%]==[0] endlocal&goto end
if [%choice%]==[] goto mmenu
if [%choice%]==[1] goto f1
if [%choice%]==[2] goto f2
if [%choice%]==[3] goto f3
if [%choice%]==[9] goto mmenu
set /p x=Invalid option, press Enter and insert valid option...
goto mmenu
:f1
cls
@echo Enabling Firewall ...
@netsh firewall set opmode enable
set /p x=Operation Completed, press Enter...
goto fmenu
:f2
cls
@echo Disabling Firewall ...
@netsh firewall set opmode disable
set /p x=Operation Completed, press Enter...
goto fmenu
:f3
cls
@echo Firewall Config:
@netsh firewall show opmode
set /p x=Operation Completed, press Enter...
goto fmenu
rem Network Drives Menu
:ndmenu
cls
@echo ###################
@echo # Network Drives: #
@echo ###################
@echo [1] Map Network Drives (@office)
@echo [2] Remove Network Drives (@home)
@echo [9] Main Menu
@echo [0] Exit...
set /p choice=Insert Choice:
if /i [%choice%]==[0] endlocal&goto end
if [%choice%]==[] goto mmenu
if [%choice%]==[1] goto f1
if [%choice%]==[2] goto f2
if [%choice%]==[9] goto mmenu
set /p x=Invalid option, press Enter and insert valid option...
goto mmenu
:nd1
cls
@echo Mapping Network Drives (@office) ...
net use w: \\server_ip_or_name\path_to_folder /persistent:yes
net use z: \\server_ip_or_name\path_to_folder
set /p x=Operation Completed, press Enter...
goto mpmenu
:nd2
cls
@echo Removing Network Drives (@home) ...
net use w: /delete
net use z: /delete
set /p x=Operation Completed, press Enter...
goto mpmenu
rem Main Menu Options
:m1
cls
@echo Configuring network interface...
@netsh interface ip set address "Wireless Network Connection" static 192.168.1.1 255.255.255.0 192.168.1.254 1
@netsh interface ip set dns "Wireless Network Connection" static 192.168.1.100
set /p x=Operation Completed, press Enter...
goto mmenu
:m2
cls
@echo Configuring network interface...
@netsh interface ip set address "Wireless Network Connection" static 192.168.2.1 255.255.255.0 192.168.2.254 1
@netsh interface ip set dns "Wireless Network Connection static 192.168.2.100
set /p x=Operation Completed, press Enter...
goto mmenu
:m3
cls
@echo Configuring network interface...
@netsh interface ip set address "Wireless Network Connection" dhcp
@netsh interface ip set dns "Wireless Network Connection" dhcp
set /p x=Operation Completed, press Enter...
goto mmenu
:m9
@netsh int ip show config
set /p x=Operation Completed, press Enter...
goto mmenu
:end
cls
@echo Visit author site at www.tiagomarques.info
@echo NWConfig script by Tiago Marques
pause
***** FIM BATCH *****
Fonte: http://www.tiagomarques.info/scripts/