[分享]批处理ping指定车站工作站ip，并分别存放（新手作品）

newgain · 发表于 2021-4-4 00:18:47

状况说明：
50个车站，编号为1-50，对应IP段分别为192.168.100.*--192.168.149.*
每个车站22个工作站，IP尾分别为 1，2，3，4，5，13，14，15，23，24，25，33，34，35，43，44，45，51，52，53，54，55
要求，可以对指定车站所有工作站完成PING操作，检查是否离线
代码如下：

批处理文件test.bat：

@echo off
del /s /q *号*.txt
::删除历史检测文件，防止混淆
:begin
set /p cum="请输入站点编号(1-50)："
set /a num=%cum%-1
if %cum% equ 0 goto begin
if %cum% geq 51 goto begin
::输入站点编号检查，如有错误重新输入
if %cum% geq 1 if %cum% leq 10 goto nexta
if %cum% geq 11 if %cum% leq 50 goto nextb
:nexta
@echo on
for /f %%a in (ip.txt) do ping /n 1 192.168.10%num%.%%a | find "TTL" >nul && echo 192.168.10%num%.%%a >>%cum%号站点up.txt || echo 192.168.10%num%.%%a>>%cum%号站点down.txt
goto begin
:nextb
@echo on
for /f %%a in (ip.txt) do ping /n 1 192.168.1%num%.%%a | find "TTL" >nul && echo 192.168.1%num%.%%a >>%cum%号站点up.txt || echo 192.168.1%num%.%%a>>%cum%号站点down.txt
goto begin

复制代码

新手作品，写法比较粗糙，请高手指定斧正。谢谢

newgain · 发表于 2021-4-4 10:52:43

本帖最后由 newgain 于 2021-4-4 11:01 编辑

@echo off
del /s /q *号*.txt
::删除历史检测文件，防止混淆
:begin
set /p cum="请输入站点编号(1-50):"
echo %cum%|findstr /be "[0-9]*" >nul && goto next || goto begin
::检查输入数据合理性
:next
set /a num=%cum%-1
if %cum% equ 0 goto begin
if %cum% geq 51 goto begin
::输入站点编号检查，如有错误重新输入
if %cum% geq 1 if %cum% leq 10 goto nexta
if %cum% geq 11 if %cum% leq 50 goto nextb
:nexta
@echo on
for /f %%a in (ip.txt) do ping /n 1 192.168.10%num%.%%a | find "TTL" >nul && echo 192.168.10%num%.%%a >>%cum%号站点up.txt || echo 192.168.10%num%.%%a>>%cum%号站点down.txt
echo 本次查询结束，按任意键查询其他站点
cls
::清理屏幕，继续下次查询
pause
goto begin
:nextb
@echo on
for /f %%a in (ip.txt) do ping /n 1 192.168.1%num%.%%a | find "TTL" >nul && echo 192.168.1%num%.%%a >>%cum%号站点up.txt || echo 192.168.1%num%.%%a>>%cum%号站点down.txt
echo 本次查询结束，按任意键查询其他站点
cls
::清理屏幕，继续下次查询
pause
goto begin

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[网络连接] [分享]批处理ping指定车站工作站ip，并分别存放（新手作品）

评分