中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-07-03 18:31
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 自动arp清除.bat 查看 641 回复 1
楼 主 自动arp清除.bat 发表于 2009-05-13 15:01 ·  中国 重庆 电信
初级用户
积分 38
发帖 22
注册 2008-08-14 22:58
17年会员
UID 123209
性别 男
状态 离线
@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

很久以前写的。
附件
自动arp清除.rar (768 bytes, 下载次数: 24)
2 发表于 2009-05-15 02:50 ·  中国 江西 南昌 电信
新手上路
积分 13
发帖 6
注册 2006-12-08 10:11
19年会员
UID 72919
性别 男
状态 离线
貌似很强大哦
论坛跳转: