Realizar ping a una direccion

Iniciado por EARM, 14 Enero 2015, 15:37 PM

0 Miembros y 1 Visitante están viendo este tema.

EARM

Buenas tardes muy buen aporte, tengo una duda respecto a los bath yo quiero hacer ping a una direccion ip y si esta no me responde que me abra un aplicativo cualquiera, estuve indagando y encontré uno que lo hace a una pagina web y abre el aplicativo, realice pruebas con este y solo me funcionaba si desconectaba el cable, lo probé asignandole una ip al codigo y desconectaba el equipo al cual le hacia la ip pero no me funcionaba el codigo era el siguiente:

Código (DOS) [Seleccionar]
@echo off
:inicio
if exist testigo.txt del testigo.txt
set ERRORLEVEL =
ping  www.google.com > testigo.txt
rem La solicitud de ping no pudo encontrar el host
echo Comprobando conectividad ...
@find /C "La solicitud de ping no pudo encontrar el host" testigo.txt > null
rem find /C "recibidos = 0" testigo.txt

rem si errorlevel = 0  ha encontrado recibidos=0 lo cual indica que no hay conectivida
if %ERRORLEVEL%==0  goto pita else goto continua

:continua
color 17
echo Si hay conectividad    
rem delay de 30min
@ping -n 2 127.0.0.1 > null
goto inicio
   
:pita
echo No hay conectividad
color cf
rem Ejecuta el programa .bat y abre el archivo robocopy.doc (las rutas pueden variar en cada caso)
start C:\Users\t.bat
rem delay de 5min
@ping -n 300 127.0.0.1 > null
goto inicio


quisiera saber que puedo hacer les agradezco su colaboracion.


Mod: Etiquetas GeSHi obligatorias.

Eleкtro

#1
Hola

1) Está prohibido hacer doble post.

2) Utiliza las etiquetas para insertar código, porfavor, lee las normas de este subforo.

3) Prueba este código:

Código (dos) [Seleccionar]
@echo off

Set "url=www.google.com"
set "outFile=%temp%\Testigo.tmp"

:Main
Cls
Echo:[+] Haciendo ping a "%url%"...
(Ping.exe "%url%")>"%outFile%" && (
(Find.exe /I /C "recibidos = 0" "%outFile%")1>NUL && (
Goto :Error
) || (
Goto :Success
)
) || (
Goto :Error
)

:Error
Echo:[+] No hay conectividad
Color cf
:: Ejecuta el programa .bat y abre el archivo robocopy.doc (las rutas pueden variar en cada caso)
"C:\Users\t.bat"
:: Delay de 5min
(Ping.exe -n "300" "LocalHost")1>Nul
Goto :Main

:Success
Color 17
Echo:[+] Si hay conectividad    
Timeout /T 30
(Ping.exe -n "2" "LocalHost")1>Nul
Goto :Main


Saludos!








EARM

Amigo muchisimas gracias sos lo maximo realmente es la primera vez que uso un foro para postear algo tendre encuenta las normas ,te agradezco que te hayas tomado tiempo para realizar la respuesta muchisimas gracias