yyykkkyyyy

回复 7# hacker85


    呵呵你有这需求，自己赶紧补学批处理，应该不难，指望别人总是不方便的。我这帮你整了个在xp环境用的

@echo off&title 局域网检测
set ff=list.txt
Rem    =======获取本机的IP地址========
echo;
for /f "tokens=1-6 delims=.: " %%a in ('ipconfig^|find ". . ."')do (
   set %%a_%%b=%%c.%%d.%%e.%%f
   if /i "%%a"=="ip" set ipd=%%c.%%d.%%e)
echo 本机 IP  %ip_address%
echo 子网掩码 %Subnet_Mask%
echo 网   关  %default_gateway%
set ip%default_gateway%=y
set/a n1=0,n2=0
echo.&echo 正在搜索 %ipd%.* 网段在线计算机 ... 
setlocal enabledelayedexpansion
(echo;%date:~,10% %time% 在线计算机：&echo;
echo  计算机名                 IP
echo ==================================
for /f "delims=\" %%i in ('net view^|find "\\"')do (
  set "var=%%i                    "
  set ip%%i=y
  for /f "tokens=3 delims=: " %%j in ('ping -n 1 %%i^|find/i "Reply from"'
    )do (echo !var:~,20!%%j&echo !var:~,20!%%j>con&set/a n1+=1))
echo ==================================
echo   共有 !n1! 个在线&echo; 
echo 以下 IP 离线：&(echo;&echo 离线 IP：&echo;)>con
echo ==============

for /L %%i in (1,1,254)do if not defined ip%ipd%.%%i (
  set/a n2+=1
  echo;%ipd%.%%i&echo;%ipd%.%%i>con)
echo ==============
echo !n2! 个离线)>"%ff%" 
echo;&echo %n2% 个离线
endlocal
echo;&set/p= 检测完成,按任意键退出... <nul&pause>nul
复制代码