中国DOS联盟

::自动获取网关地址，不用手工输入地址来ping。by yangzhiyi
@echo off
title PING 网关地址
if not %OS%==Windows_NT echo 这个程序只适用于 WINDOWS 2000/XP/2003 系统 & pause >nul & GOTO :EOF
ipconfig | find /i "Default Gateway" >nul || (echo 你的网络连接不正常，无法自动获取网关地址。 & echo. & echo 按任意键退出。。。 & pause >nul & goto :EOF)
rd /s /q "%temp%\iptest" 1>nul 2>nul
md "%temp%\iptest" 1>nul 2>nul

for /f "tokens=2 delims=:" %%i in ('ipconfig^|find /i "Default Gateway"') do (echo 网关%%i>>%temp%\iptest\Gateway.txt)
findstr "[.]" %temp%\iptest\Gateway.txt >%temp%\iptest\Gateway1.txt 2>nul
for /f "tokens=2 delims= " %%i in (%temp%\iptest\Gateway1.txt) do (echo %%i>>%temp%\iptest\Gateway2.txt)
findstr /n "[.]" %temp%\iptest\Gateway2.txt >%temp%\iptest\Gateway3.txt 2>nul
for /f "skip=1 tokens=2 delims=:" %%i in (%temp%\iptest\Gateway3.txt) do (set add=%%i)
for /f "tokens=2 delims=:" %%i in (%temp%\iptest\Gateway3.txt) do (set  Gateway=%%i)
if "%Gateway%"=="" (cls & echo 无法自动获取网关地址 &goto end)
if "%add%" == "" goto ping

echo 请选择你想测试的网关
echo.
type %temp%\iptest\Gateway3.txt 2>nul
echo.
set op=1
set /p op=请选择[回车键%op%]：
findstr "%op%:" %temp%\iptest\Gateway3.txt >%temp%\iptest\Gateway4.txt  2>nul
for /f "tokens=2 delims=:" %%i in (%temp%\iptest\Gateway4.txt) do (set  Gateway=%%i)
if "%Gateway%"=="" (cls & echo 无法自动获取网关地址 &goto end) else (goto ping)

:ping
cls
echo 测试网关：%Gateway%
echo.
set bbb=4
echo 输入指定发送回响请求消息的次数
set /p bbb=[回车键默认%bbb%次，0为不限]：

echo 0%bbb%>%temp%\iptest\Gateway4.txt
findstr /x "[0-9]*" %temp%\iptest\Gateway4.txt || goto ping
::if "%bbb%" == "" goto ping
rd /s /q "%temp%\iptest" 1>nul 2>nul
if "%bbb%" == "0" (
cls
echo 执行 ping %Gateway% -t
echo.
ping -t %Gateway%
) else (
cls
echo 执行 ping %Gateway% -n %bbb%
echo.
ping -n %bbb% %Gateway%
)
goto end

:end
echo. & echo 按任意键退出。。。 & pause >nul