Batch Datei für Ping mehrerer Rechner, Abfrage, Benachrichtigung per Email

@echo off & setlocal
cls
title IPScan

set IPConst=192.168
set Log=%temp%\ipscan.txt

rem ############

echo IP parameter eingeben (ip) Bsp: %IPConst%.ip.110
set /p ip=

rem ############

echo Achtung! Durch druecken einer Taste startet der Scan. Dies kann einige Zeit
echo in Anspruch nehmen.
pause>nul

echo IPScan>%Log%
echo Ping gestartet

rem ############

for /L %%a in (1, 1, 254) do (
	echo Pinge %IPConst%.%ip%.%%a
	ping %IPConst%.%ip%.%%a -n 1 -w 300 | find "TTL" >nul && call :Ausgabe %IPConst%.%ip%.%%a  
)

rem #############

echo Ping ausgefuehrt. %Log% wird nach dem druecken einer Taste geloescht.
%Log%
pause>nul
del %Log%

rem ##ende##
goto :eof

:Ausgabe
set Info=IP erreichbar:   %1
for /f "tokens=2 delims=:. " %%i in ('nslookup %1 2^>nul^|findstr /b "Name:"') do set "Info=%Info%	- %%i"  
echo %Info% >>%Log%