netview

echo off
prompt ~
IF EXIST C:\a\ del /q C:\a\*
IF NOT EXIST C:\a\ mkdir C:\a\
cls
echo.
echo.
echo.
echo TYPE THE IP ADRESS IN THE FORM (w.x.y.z)
echo.
echo.
echo w=
set /p w=
echo x=
set /p x=
echo y=
set /p y=
echo z=
set /p z=
set count=0

:10

set ipadd=%w%.%x%.%y%.%z%
cls
echo %ipadd%

REM --------- CHECKING IP TO SEE IF ONLINE

ping -n 1 -l 10 -f -w 1 %w%.%x%.%y%.%z% >> C:\ping5.txt
findstr "Reply" C:\ping5.txt
If %errorlevel% EQU 0 GOTO :NETVIEW
del C:\ping5.txt


:IPCOUNTER
set /a count=%count%+1

If %w% EQU 255 If %x% EQU 255 If %y% EQU 255 If %z% EQU 255 (cls && echo The number of combinations is %count%)

If %x% EQU 255 If %y% EQU 255 If %z% EQU 255 (Set /a w=%w%+1 && Set x=0 && Set y=0 && Set z=0 && goto :10)
If %y% EQU 255 If %z% EQU 255 (Set /a x=%x%+1 && Set y=0 && Set z=0 && goto :10)
If %z% EQU 255 (Set /a y=%y%+1 && Set z=0 && goto :10)
set /a z=%z%+1

GOTO :10

:NETVIEW
del C:\ping5.txt
echo ^e^cho off >> C:\a\view%w%.%x%.%y%.%z%.bat
echo net view \\%w%.%x%.%y%.%z% ^>^> F:\a\view%w%.%x%.%y%.%z%.txt >> C:\a\view%w%.%x%.%y%.%z%.bat
echo exit >> C:\a\view%w%.%x%.%y%.%z%.bat
start C:\a\view%w%.%x%.%y%.%z%.bat

GOTO :IPCOUNTER



save this with extension .bat