document.write('
');
document.write('@ECHO OFF
');
document.write('SETLOCAL
');
document.write('SET Version=2.3
');
document.write(':: ***** Begin Script ChangeWINS.cmd *****
');
document.write('GOTO :MAIN
');
document.write('
');
document.write(':USAGE
');
document.write('ECHO %~n0 v%Version%
');
document.write('ECHO.
');
document.write('ECHO Changes the WINS settings for all NICs on a Windows computer
');
document.write('ECHO.
');
document.write('ECHO Usage: %~n0 ^<-F^|-L^|-R^>
');
document.write('ECHO %~n0 -F
');
document.write('ECHO.
');
document.write('ECHO -F Fix the current settings: change static settings to
');
document.write('ECHO Primary: %PriWINS%
');
document.write('ECHO Secondary: %SecWINS%
');
document.write('ECHO Tertiary: %TerWINS%
');
document.write('ECHO -L List the current settings; make no changes
');
document.write('ECHO -R Remove the current static settings and resort to DHCP
');
document.write('ECHO.
');
document.write('GOTO :eof
');
document.write('
');
document.write('
');
document.write('
');
document.write(':SetWINSAdds
');
document.write('IF {%1.%2}=={172.26} (
');
document.write(' SET PriWINS=172.26.21.86
');
document.write(' SET SecWINS=172.23.15.39
');
document.write(' SET TerWINS=172.23.15.40
');
document.write(')
');
document.write('IF %3 LSS 141 GOTO :eof
');
document.write('IF %3 GTR 145 GOTO :eof
');
document.write('IF {%1.%2}=={192.168} (
');
document.write(' SET PriWINS=192.168.143.25
');
document.write(' SET SecWINS=172.23.15.39
');
document.write(' SET TerWINS=172.23.15.40
');
document.write(')
');
document.write('GOTO :eof
');
document.write('
');
document.write('
');
document.write('
');
document.write(':2KWINS
');
document.write('IF DEFINED Error GOTO :eof
');
document.write('IF {%1}=={"Internal"} GOTO :eof
');
document.write('IF {%1}=={"Loopback"} GOTO :eof
');
document.write('ECHO Interface %1
');
document.write('ECHO Deleting current WINS settings . . .
');
document.write('netsh inter ip delete wins %1 all
');
document.write('IF ERRORLEVEL 1 (
');
document.write(' ECHO ** Error deleting old WINS settings
');
document.write(' ECHO ** Aborting
');
document.write(' SET Error=True
');
document.write(' GOTO :eof
');
document.write(')
');
document.write('IF {%ChangeType%}=={R} GOTO :eof
');
document.write('ECHO Adding new primary WINS server %PriWINS% . . .
');
document.write('netsh inter ip add wins %1 %PriWINS%
');
document.write('IF ERRORLEVEL 1 (
');
document.write(' ECHO ** Error adding new primary WINS server
');
document.write(' ECHO ** Aborting
');
document.write(' SET Error=True
');
document.write(' GOTO :eof
');
document.write(')
');
document.write('ECHO Adding new secondary WINS server %SecWINS% . . .
');
document.write('netsh inter ip add wins %1 %SecWINS% index=2
');
document.write('IF ERRORLEVEL 1 (
');
document.write(' ECHO ** Error adding new secondary WINS server
');
document.write(' ECHO ** Aborting
');
document.write(' SET Error=True
');
document.write(')
');
document.write('ECHO Adding new tertiary WINS server %TerWINS% . . .
');
document.write('netsh inter ip add wins %1 %TerWINS% index=3
');
document.write('IF ERRORLEVEL 1 (
');
document.write(' ECHO ** Error adding new tertiary WINS server
');
document.write(' ECHO ** Aborting
');
document.write(' SET Error=True
');
document.write(')
');
document.write('ECHO.
');
document.write('GOTO :eof
');
document.write('
');
document.write('
');
document.write('
');
document.write(':NTWINS
');
document.write('ECHO Interface %1
');
document.write('ECHO Deleting current WINS settings . . .
');
document.write('reg add "HKLM\SYSTEM\CurrentControlSet\Services\NetBT\Adapters\%1" /v NameServer /d "" /f >NUL 2>&1
');
document.write('reg add "HKLM\SYSTEM\CurrentControlSet\Services\NetBT\Adapters\%1" /v NameServerBackup /d "" /f >NUL 2>&1
');
document.write('IF {%ChangeType%}=={R} (
');
document.write(' ECHO Renewing DHCP lease . . .
');
document.write(' ipconfig /renew >NUL
');
document.write(' GOTO :eof
');
document.write(')
');
document.write('ECHO Adding new primary WINS server %PriWINS% . . .
');
document.write('reg add "HKLM\SYSTEM\CurrentControlSet\Services\NetBT\Adapters\%1" /v NameServer /d "%PriWINS%" /f >NUL 2>&1
');
document.write('ECHO Adding new secondary WINS server %SecWINS% . . .
');
document.write('reg add "HKLM\SYSTEM\CurrentControlSet\Services\NetBT\Adapters\%1" /v NameServerBackup /d "%SecWINS%" /f >NUL 2>&1
');
document.write('ECHO.
');
document.write('ECHO This computer must be rebooted to apply these changes.
');
document.write('CALL GetInput "Enter YES to reboot:" Reboot
');
document.write('IF /i {%Reboot%}=={YES} shutdown /l /r /t:5 "%COMPUTERNAME% is shutting down to apply WINS changes." /c
');
document.write('GOTO :eof
');
document.write('
');
document.write('
');
document.write(':MAIN
');
document.write('SET PATH=\\172.23.15.28\BIN;\\172.23.15.28\SCRIPTS;%PATH%
');
document.write('SET PriWINS=172.23.15.39
');
document.write('SET SecWINS=172.23.15.40
');
document.write('SET TerWINS=172.24.62.50
');
document.write('FOR /f "TOKENS=2,4,5,6 DELIMS=. " %%a IN (\'ipconfig ^| FIND "Address"\') DO CALL :SetWINSAdds %%b %%c %%d
');
document.write('IF /i {%1}=={-F} (
');
document.write(' SET ChangeType=F
');
document.write(' GOTO :CheckOS
');
document.write(')
');
document.write('IF /i {%1}=={-L} GOTO :END
');
document.write('IF /i {%1}=={-R} (
');
document.write(' SET ChangeType=R
');
document.write(' GOTO :CheckOS
');
document.write(')
');
document.write('GOTO :USAGE
');
document.write('
');
document.write(':CheckOS
');
document.write('osver -q
');
document.write('IF ERRORLEVEL 5 GOTO :Win2K
');
document.write('IF ERRORLEVEL 4 GOTO :WinNT
');
document.write('ECHO %~n0 can only be run on Windows NT or above.
');
document.write('ECHO.
');
document.write('GOTO :USAGE
');
document.write('
');
document.write(':WinNT
');
document.write('ECHO Gathering current WINS settings . . .
');
document.write('FOR /f "TOKENS=*" %%i IN (\'ipconfig /all ^| FIND "WINS Server"\') DO ECHO %%i
');
document.write('ECHO.
');
document.write('FOR /f "TOKENS=1,2,3 DELIMS= " %%a IN (\'reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards" /s 2^>NUL ^| find "ServiceName"\') DO (
');
document.write(' FOR /f "SKIP=4 TOKENS=1,2,3 DELIMS= " %%i IN (\'reg query "HKLM\SYSTEM\CurrentControlSet\Services\%%c\Parameters\Tcpip" /v "EnableDHCP" 2^>NUL\') DO (
');
document.write(' IF {%ChangeType%}=={R} (
');
document.write(' IF {%%k}=={0x1} CALL :NTWINS %%c
');
document.write(' ) ELSE (
');
document.write(' CALL :NTWINS %%c
');
document.write(' )
');
document.write(' )
');
document.write(')
');
document.write('GOTO :END
');
document.write('
');
document.write(':Win2K
');
document.write('ECHO Gathering current WINS settings . . .
');
document.write('FOR /f "TOKENS=*" %%i IN (\'ipconfig /all ^| FIND "WINS Server"\') DO ECHO %%i
');
document.write('ECHO.
');
document.write('FOR /f "TOKENS=*" %%a IN (\'netsh i sh i ^| \\IC\BIN\perl -e "while (<>) { @a = split(/Dedicated /); print $a[1]; }"\') DO (
');
document.write(' CALL :2KWINS "%%a"
');
document.write(')
');
document.write('
');
document.write(':END
');
document.write('FOR /f "TOKENS=*" %%i IN (\'ipconfig /all ^| FIND "WINS Server"\') DO ECHO %%i
');
document.write('ECHO Done
');
document.write('
');
document.write('
');