| 12
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 
 | ::://BAT URL CHECKER
::://BY SachaDee 2013
@ECHO OFF
Title Test de validite URL
cls
Color 9B
mode con cols=140 lines=4
::://ICI L'URL A TESTER
set URLTest="http://www.gametop.com/online-free-games/desert-rider-online/game.swf"
::://
if exist $u del $u
(
echo Set HttpRequest = CreateObject^("Msxml2.XMLHTTP"^)
echo set shl = createobject^("wscript.shell"^)
echo HttpRequest.open "HEAD", %URLTest%, False
echo On Error Resume Next
echo HttpRequest.send
echo If Err.Number ^<^> 0 Then
echo shl.run "cmd /c echo " ^& Err.Number ^& ">$U",0 ,false
echo Else
echo shl.run "cmd /c echo " ^& HttpRequest.status ^& ">$U",0 ,false
echo End If)>URL.vbs
URL.vbs
>nul PING localhost -n 2 -w 1000
::echo %URLTest%
for /f %%a in ($U) do (if %%a equ 404 echo URLTest INVALIDE
                       if %%a equ 200 echo %URLTest% est VALIDE
                       if %%a lss 100 echo ERREUR DE CONNEXION)
Echo Appuyez sur une touche pour atteindre  %URLTest% avec Internet Explorer               
pause>Nul
Start iexplore %URLTest% | 
Partager