帮忙写一个脚本、把本机IP从xx.xx.xx.0一直改到xx.xx.xx.255、每改一个IP就ping一下192.168.100.1和百度或者别的网站、列出能两个都能ping通的还有IP有冲突的。新建一个txt。最好改IP和ping之间有那么几秒的间隔
192.168.100.1是每个IP都应该能ping通的
求大神帮写一个把IP从0一直改到255的批处理脚本。急急急
答案:2 悬赏:10 手机版
解决时间 2021-01-27 02:27
- 提问者网友:我是女神我骄傲
- 2021-01-26 22:38
最佳答案
- 五星知识达人网友:白昼之月
- 2021-01-26 23:48
我们学校以前出现过IP争用情况,我写了一个模拟多线程IP扫描的批处理,到最后也没用上
=================================pinglan.cmd=======================
@echo offsetlocal enabledelayedexpansion
rem set /p str=输入IP前三段
echo 开始检测活动主机,此程序只检测24位掩码网段
rem 延迟
ping 127.0.0.1 -n 1 >nul
echo .
rem 检测本机IP
for /f "usebackq skip=9 tokens=11* delims=: " %%i in (`ipconfig`) do (
set ip=%%j
goto rescue
)
:rescue
rem 延迟
ping 127.0.0.1 -n 1 >nul
echo .
rem 初始化
set count=1
set filecount=1
set threadfile=1
rem 写入线程的文件
:createthread
if exist temp_thread%threadfile%.bat (
set /a threadfile=%threadfile%+1
goto :createthread)else (
goto thread)
:thread
attrib +H temp_thread%threadfile%.bat
rem 写文件
cho .
rem 避免文件覆盖
:createfile
if exist %filecount%.txt (
set /a filecount=%filecount%+1
goto :createfile)else (
goto createend)
:createend
echo .
rem 提取网段
for /f "tokens=1,2,3 delims=. " %%i in ("%ip%") do (set ip=%%i.%%j.%%k)
echo 本地网络%ip%,准备扫描
ping 127.0.0.1 -n 3 >nul
echo .
cls
rem 文件锁
attrib +R temp_thread%threadfile%.bat
start /min cmd.exe /c call temp_thread%threadfile%.bat %ip%.%count% %filecount%.txt
if %count% EQU 254 goto exit
set /a count=%count%+1
goto while
:exit
endlocal
==================================PING-thread.cmd=====================
ping %1 -n 1 -w 100 >nul
if %errorlevel% equ 0 (echo %1>>%2.txt)
********************************************************************
使用pinglan.cmd扫描,你试试吧
=================================pinglan.cmd=======================
@echo offsetlocal enabledelayedexpansion
rem set /p str=输入IP前三段
echo 开始检测活动主机,此程序只检测24位掩码网段
rem 延迟
ping 127.0.0.1 -n 1 >nul
echo .
rem 检测本机IP
for /f "usebackq skip=9 tokens=11* delims=: " %%i in (`ipconfig`) do (
set ip=%%j
goto rescue
)
:rescue
rem 延迟
ping 127.0.0.1 -n 1 >nul
echo .
rem 初始化
set count=1
set filecount=1
set threadfile=1
rem 写入线程的文件
:createthread
if exist temp_thread%threadfile%.bat (
set /a threadfile=%threadfile%+1
goto :createthread)else (
goto thread)
:thread
attrib +H temp_thread%threadfile%.bat
rem 写文件
cho .
rem 避免文件覆盖
:createfile
if exist %filecount%.txt (
set /a filecount=%filecount%+1
goto :createfile)else (
goto createend)
:createend
echo .
rem 提取网段
for /f "tokens=1,2,3 delims=. " %%i in ("%ip%") do (set ip=%%i.%%j.%%k)
echo 本地网络%ip%,准备扫描
ping 127.0.0.1 -n 3 >nul
echo .
cls
rem 文件锁
attrib +R temp_thread%threadfile%.bat
start /min cmd.exe /c call temp_thread%threadfile%.bat %ip%.%count% %filecount%.txt
if %count% EQU 254 goto exit
set /a count=%count%+1
goto while
:exit
endlocal
==================================PING-thread.cmd=====================
ping %1 -n 1 -w 100 >nul
if %errorlevel% equ 0 (echo %1>>%2.txt)
********************************************************************
使用pinglan.cmd扫描,你试试吧
全部回答
- 1楼网友:底特律间谍
- 2021-01-27 00:02
什么意思 可以上图说明下吗
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯