[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
@echo off&&setlocal enabledelayedexpansion
set name=%~n0
title %name% is made by xiaoyong


if exist %tmp%\ipconfig.txt del %tmp%\ipconfig.txt
ipconfig /all >%tmp%\ipconfig.txt
if exist %tmp%\GateIP.txt del %tmp%\GateIP.txt
find "Default Gateway" %tmp%\ipconfig.txt >%tmp%\GateIP.txt
for /f "skip=2 tokens=13" %%G in (%tmp%\GateIP.txt) do set GateIP=%%G


if exist %tmp%\IPAddr.txt del %tmp%\IPaddr.txt
find "IP Address" %tmp%\ipconfig.txt >%tmp%\IPAddr.txt
for /f "skip=2 tokens=15" %%I in (%tmp%\IPAddr.txt) do set IP=%%I
del %tmp%\ipconfig.txt
del %tmp%\GateIP.txt
del %tmp%\IPAddr.txt
echo             *****************************       
echo             *                           *
echo             *     1.ping GateIP         *
echo             *                           *
echo             *     2.ping 本机IP         *
echo             *****************************               

set /p choice=请选择(1——2):
if !choice! equ 1  set pin=%GateIP%
if !choice! equ 2  set pin=%IP%


cls
mode con cols=55 lines=4
set count=0

:return
if exist %tmp%\ping.txt del %tmp%\ping.txt
ping -n 2 %pin%>%tmp%\ping.txt&&goto display
:display
for /f "delims= tokens=1-6 skip=3"  %%I in (%tmp%\ping.txt) do (
  cls
  set var=%%I
  set/p=!var!<nul
  set m=!var:~0,5!
  ping -n 1 127.0.0.1>nul&&goto out
  
)
ut
if not "!m!" == "Reply"  goto hello           


goto return

:hello

for /l %%a in (1,1,10) do (
arp -d
)

set /a count=count+1
if !count! equ 8 goto IPrestore
goto return


:IPrestore

nbtstat -R
ipconfig /flushdns
nbtstat -RR
ipconfig /registerdns
set /a count=0

goto return

TOP

返回列表